Главная страница
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.027 c
3-70091
KAA1971
2003-05-03 14:14
2003.05.22
insert into table2 select * from table1


14-70493
ghg
2003-05-04 12:07
2003.05.22
скриптмейкер для создания дистрибов


1-70303
User
2003-05-13 09:20
2003.05.22
Список объектов


8-70398
DelAlanPhi
2003-02-10 22:29
2003.05.22
Прицепить к avi


14-70445
4you
2003-05-02 11:04
2003.05.22
Новые библиотеки