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

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

Аватара для vk_k14m@vk

Старожил


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

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


Народ. Когда то давно, товарищ R.i.m.s.k.y. подкинул мне полезный код.
Код: Выделить весь код
[Files]                                                                                                     
Source: "D:\AA2Decrypt_unpack.bat"; DestDir: "{app}"; Components: Main; AfterInstall: install_this_file_1; Flags: ignoreversion recursesubdirs createallsubdirs deleteafterinstall solidbreak

[Сode]
procedure install_this_file_1();
var res:integer; file, path : string;
begin
  file := ExpandConstant('{app}\AA2Decrypt_unpack.bat'); path := ExpandConstant('{app}');
  if FileExists(file) then Exec(file, 'параметры',path,SW_SHOW,ewWaitUntilTerminated,res) else MsgBox('Файл' + ' ' + file + #13#10 + 'не найден', mbInformation, MB_OK);
end;
Думаю вам то ясно что он делает. Запускает файла AA2Decrypt_unpack.bat сразу же после его установки.

А можно как то сделать его скрытый запуск? Что б не отображалось окно командной строки. В секции [Run] есть фалг runhidden. Хотелось бы что-то подобное...

-------
Взялся отвечать, отвечай до конца!


Отправлено: 04:59, 06-11-2017 | #2258