[Serega]

Устанавливаем 7z SFX архив в папку с программой, запускаем его и удаляем после выполнения.

читать дальше »

Код:

[Components]
Name: "eng"; Description: "Английская версия";  Flags: exclusive
Name: "rus"; Description: "Русская версия";  Flags: exclusive

[Types]
Name: "custom"; Description: "Выборочная установка"; Flags: iscustom

[Files]
Source: "D:\GAME\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
Components: rus; Source: "{src}\Rus\GAME_RUS.exe"; DestDir: "{app}"; Flags: ignoreversion external deleteafterinstall

[Run]
Filename: "{app}\GAME_RUS.exe"; WorkingDir: "{app}"; Parameters: "-y"; StatusMsg: "Процесс русификации..."; Flags: waituntilterminated skipifdoesntexist

Запуск 7z SFX архива из секции Code

читать дальше »

Код:

[Setup]
AppName=Need for Speed - Carbon
AppVerName=Need for Speed - Carbon v1.3
DefaultDirName={sd}\Games\NFSCarbon

[Components]
Name: eng; Description: Английская версия; Flags: exclusive
Name: rus; Description: Русская версия; Flags: exclusive

[Types]
Name: custom; Description: Выборочная установка; Flags: iscustom

[Files]
Source: D:\NFSCarbon\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs

[Run]
Filename: {src}\Rus\NFSC_RUS.exe; Components: rus; WorkingDir: {src}\Rus; Parameters: "-y -o""{app}"""; StatusMsg: Установка русификации...; Flags: waituntilterminated

[_Code]
procedure CurStepChanged(CurStep: TSetupStep);
var
  res:Integer;
  app, arc, dest:string;
begin
  If CurStep=ssPostInstall then
  begin
    app:=ExpandConstant('{src}')+'\7za.exe'; // консольная утилита 7z
    arc:=ExpandConstant('{src}')+'\ARC.7z';  // сам архив
    dest:=ExpandConstant('{app}');           // путь распаковки
    Exec(app, 'x "'+ arc + '" -y -o"'+ dest + '"', '', SW_SHOWNORMAL, ewWaitUntilTerminated, res);//ключи командной строки 7z
  end;
end;