Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.22;
Скачать: 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 вся ветка

Текущий архив: 2003.05.22;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.011 c
1-70264
User
2003-05-12 13:39
2003.05.22
Своё событие?


14-70510
Stan
2003-05-04 14:26
2003.05.22
Проблемы с модемом Genius GM56USB.


3-70101
Arkady
2003-04-29 15:34
2003.05.22
Пароль к базе данных Access 2000


3-70141
Владимир_
2003-05-01 11:14
2003.05.22
Программное добавления поля в таблицу dbf


9-70082
Bones
2002-12-07 04:38
2003.05.22
Создание 3dAction а на