Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

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

Старожил


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

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


Цитата R.i.m.s.k.y.:
Я обычно делаю так »
Вопросик, а в коде все правильно? Меня почему-то немного пугает красный текст в Inno Setup

[code]
procedure install_this_file();
var res:integer; file, path : string;
begin
file := ExpandConstant('{tmp}\AA2Decrypt_unpack.bat'); path := ExpandConstant('{tmp}');
if FileExists(file) then Exec(file, 'параметры',path,SW_SHOW,ewWaitUntilTerminated,res) else MsgBox('Файл') + ' ' + file + #13#10 + 'не найден' ), mbInformation, MB_OK);
end;

Function AA2Decrypt_fix_unpack.bat():boolean;
begin
if это_приложение_уже_установлено then Result := True else Result := False;
end;

А вот когда меняю ' на " то красный текст меняет цвет.

Отправлено: 01:52, 29-09-2017 | #2129