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

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

Аватара для Sanshalay

Новый участник


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

Профиль | Сайт | Цитировать


Хочу что бы после установки запускались файлы по порядку (один запустился, закрылся, следующий запустился и так далее). Сделал вот так вот:
Код: Выделить весь код
procedure CurStepChanged(CurStep: TSetupStep);
var
ErrorCode: Integer;
begin
if CurStep = ssInstall then
begin
StatusLabel.Caption:= ExpandConstant ('{cm:StatusLabel_Extracting}');
end;
if CurStep = ssPostInstall then
begin
StatusLabel.Caption:= ExpandConstant ('{cm:StatusLabel_Jerseys}');
ShellExec('', ExpandConstant('{app}\Jerseys.bat'),'', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode);
StatusLabel.Caption:= ExpandConstant ('{cm:StatusLabel_Arenas}');
ShellExec('', ExpandConstant('{app}\Boards.bat'),'', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode);
StatusLabel.Caption:= ExpandConstant ('{cm:StatusLabel_Ice}');
ShellExec('', ExpandConstant('{app}\Ice.bat'),'', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode);
end;
end;
Но ничего не запускается. Кто может помочь?

Отправлено: 23:06, 03-06-2012 | #201