Форум: "Основная";
Текущий архив: 2003.05.22;
Скачать: [xml.tar.bz2];
ВнизКак запустить файл с добавками. Найти похожие ветки
← →
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 вся ветка
Форум: "Основная";
Текущий архив: 2003.05.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c