[Dodakaedr]

А как на это вывести окно "приложение запущено, закрыть?". Через ISTask легко А как тут реализовать? »

Как вариант

Код:

[Setup]
AppName=Test
AppVersion=1.1
DefaultDirName={pf}\Test

[Code]
function CheckAppRun: boolean;
var
i: integer;
begin
if FindWindowByWindowName('Калькулятор') = 0 then
  Result:= True
  else if MsgBox('Закрыть калькулятор?', mbError, MB_YESNO) = idyes then begin
  Exec(ExpandConstant('{sys}\taskkill.exe'), ' /F /IM calc.exe', '', SW_HIDE, ewWaitUntilTerminated, i);
  Result := True;
  end;
end;

function InitializeSetup(): Boolean;
begin
  Result := CheckAppRun;
end;