Raf-9600, объясните поподробней, как понять работать в невидимом режиме? т.е. вы её запускаете и что вы собрались с ней сделать?
Цитата p3rf3ct1c:
вот только я не могу догадаться что надо добавить там где я отметил жирным и подчеркнул »
|
Конкретно для вашего случая:
пример
Код:

[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes
[Languages]
Name: russian; MessagesFile: compiler:Languages\Russian.isl
[code]
var
RunProg: TCheckBox;
procedure CheckBoxChecked;
var
res: Integer;
begin
if RunProg.Checked then
// запускаем gfwlivesetup.exe
Exec(ExpandConstant('{src}\Redistributables\gfwlivesetup.exe'), '',
ExpandConstant('{src}\Redistributables'), SW_HIDE, ewWaitUntilTerminated, res);
end;
procedure GreatCheckBox;
begin
RunProg:= TCheckBox.Create(WizardForm);
with RunProg do
begin
Parent := WizardForm;
Caption := 'Установить программу?';
SetBounds(140,330,150,15);
Cursor:= crHand;
Checked:= True;
end;
end;
procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID = wpFinished then GreatCheckBox;
end;
procedure CurStepChanged(CurStep: TSetupStep);
begin
if CurStep = ssDone then CheckBoxChecked;
end;