Как сделать так чтобы сначала инсталятор запустил импортированый exe-шник, а потом уже установил мои файлы?
Код:
Код: Выделить всё
[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
OutputDir=...
[Files]
Source: compiler:Examples\MyProg.exe; DestDir: {tmp}; Flags: deleteafterinstall;
[Code]
procedure CurStepChanged(CurStep: TSetupStep);
var
i: Integer;
begin
case CurStep of
ssInstall:
begin
ExtractTemporaryFile('MyProg.exe');
Exec(ExpandConstant('{tmp}\MyProg.exe'), '', '', 5, ewWaitUntilTerminated, i);
end;
end;
end;