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

Название темы: Inno Setup. Прочие вопросы
Показать сообщение отдельно

Старожил


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

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


У меня не работает этот код:
Код: Выделить весь код
[Files]
Source: ISTask.dll; DestDir: {app}; Flags: dontcopy

[code]
function KillTask(ExeFileName: string): Integer;
external 'KillTask@files:ISTask.dll stdcall delayload';

function RunTask(FileName: string; bFullpath: Boolean): Boolean;
external 'RunTask@files:ISTask.dll stdcall delayload';

//**************************************************//
function InitializeSetup(): Boolean;
begin
  If RunTask('winamp.exe', false) then
    begin
      if MsgBox('Программа Winamp используется. Закрыть и продолжить установку?', mbInformation, mb_YesNo) = idYes then
        begin
          KillTask('winamp.exe');
          Result:= True;
        end else
          Exit;
    end;
Result:=True;
end;
Просто проходит установка без запросов и ничего не закрывает

Отправлено: 23:53, 21-02-2020 | #607

Название темы: Inno Setup. Прочие вопросы