Скачать: CL | DM;

Как запустить файл с добавками.   Найти похожие ветки 

← →
Le!   (2003-05-09 07:25) [0]

Народ подскажите. нужно запустить файл например вот так: "Pkzip.exe -b log.zip". как ето можно сделать?
Shellexecute не помогает, либо просто не работает.

---

← →
german goering   (2003-05-09 07:47) [1]

А так не работает что-ли?:
WinExec("Pkzip.exe -b log.zip",SW_OPTION)
ShellExecute(hwnd,"open","Pkzip.exe","-b log.zip",dir,SW_OPTION)

---

← →
Erik Ivanov   (2003-05-09 12:31) [2]

Или так:
var
SI: TStartupInfo;
PI: TProcessInformation;
begin

ZeroMemory(@SI, SizeOf(SI));
SI.cb := SizeOf(SI);
SI.dwFlags := STARTF_USESHOWWINDOW;
SI.wShowWindow := SW_SHOW; //SW_HIDE;

//Run Application

if CreateProcess(nil,PChar(Cmd), nil, nil, False,
CREATE_NEW_CONSOLE or IDLE_PRIORITY_CLASS, nil, nil, SI, PI) then begin
SetPriorityClass(PI.hProcess, IDLE_PRIORITY_CLASS);
SetThreadPriority(PI.hThread,THREAD_PRIORITY_LOWEST);
WaitForSingleObject(PI.hProcess, INFINITE);
CloseHandle(PI.hThread);
CloseHandle(PI.hProcess);
end else begin
raise Exception.Create("Invalid create process "+SysErrorMessage(GetLastError()));
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c