Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 510
Благодарности: 51

Профиль | Отправить PM | Цитировать


Лександер то прикол в том что вчера(до того как я кидал тебе скрипт все было нормально) но проблема решается так

procedure CurStepChanged2(CurStep: TSetupStep);
var res: integer;
begin
CurStepChanged1(CurStep: TSetupStep);
if CurStep = ssPostInstall then begin
If Soft.Checked then begin
WizardForm.FileNameLabel.Caption:=ExpandConstant('{cm:SoftInstall}');
Exec(ExpandConstant('Hard Reset repack\Redist\DirectX\DXSETUP.exe'), '/silent', ExpandConstant('Redist\DirectX'), SW_SHOW, ewWaitUntilTerminated, Res);
Exec(ExpandConstant('Hard Reset repack\Redist\vcredist.exe'), '/Q', ExpandConstant('Redist'), SW_SHOW, ewWaitUntilTerminated, Res);
end;
end;
end;

если CurStepChanged1(CurStep: TSetupStep); убрать все нормально но архивы не распаковываются а если оставить то не видно прогресс бара

может вообще убрать слайды?

Отправлено: 20:20, 23-09-2011 | #3204