Snake750, можно использовать WinAPI:
CreateProcess -- для создания процесса/запуска приложения
Код:
var
sInfo : TStartupInfo;
pInfo : TProcessInformation;
OpenDlgBox : TOpenFileName;
begin
// Создание процесса
if CreateProcess(OpenDlgBox.lpstrFile, nil, nil, nil, False, 0, nil, nil, sInfo, pInfo) then
// бла-бла-бла
end;
TerminateProcess -- для завершения процесса/приложения
Код:
procedure KillProcess(hProcess:DWORD); // Процедура убивания созданного нами процесса
var
ExitCode : UINT; // Статус завершения определённого процесса
begin
if GetExitCodeProcess(hProcess, ExitCode) = True then
TerminateProcess(hProcess, ExitCode);
end; // KillProcess
