[Painkiller]

kotkovets, в том то и дело что путь к makensis', 'путь к скрипту не работает. И я использую функцию

Код:

 function SwitchToProg(const Path: string): Boolean;
var
  SI: TStartupInfo;
  PI: TProcessInformation;
  ExitCode: Cardinal;
begin
  FillChar(SI, SizeOf(SI), 0);
  SI.cb := SizeOf(SI);

  Result := CreateProcess(nil, PChar(Path), nil, nil, False, 0, nil, nil,
    SI, PI);

  if Result then
  begin

    while GetExitCodeProcess(PI.hProcess, ExitCode) and
      (ExitCode = STILL_ACTIVE) do
      ; // ждем завершения, пустой цикл
   Form1.StatusBar1.SimpleText:='                                       Копиляция выполнена!';
    Form2.show;
  end;
end;

Мне нужно как-то запустить makensis ? Получается запустить только через батник. А ту функцию что вы мне написали я знаю. Ещё куча других подобных примеров есть . Мне лишь нужно знать как запустить makensis ?