Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

Запускаю RAR через CreateProcess. Как свернуть окно MS-DOS ?   Найти похожие ветки 

 
NovyeVasyuki   (2004-05-07 15:04) [0]

собственно процедура, которая дожидается окончания выполнения :
//--------------------------------------
procedure StartAndWait(name : PChar);
var
  si : TStartupInfo;
  pi : TProcessInformation;
begin
  ZeroMemory(@si,sizeof(si));
  si.cb:=SizeOf(si); Window
  if not CreateProcess(nil,name,nil,nil,False,0,nil,nil,si,pi)
    then messageBox(0,"Не возможно запустить процесс","",mb_ok);
  WaitForSingleObject( pi.hProcess, INFINITE );
end;
В нее передаю команду "rar.exe .........."
Как можно свернуть выскакивающее MS-DOS-овское окно ?


 
Романов Р.В. ©   (2004-05-07 15:09) [1]

F1 - CreateProcess - lpStartupInfo - wShowWindow - SW_HIDE


 
Romkin ©   (2004-05-07 15:11) [2]

Вряд ли у тебя rar для DOS, скорее это консольная программа для windows ;) Ну или если уж откопал таакого монстра, возьми rar.exe из поставки winRAR...
У TProcessInformation есть wShowWindow, просто поставь SW_HIDE :))
А по-хорошему - сюда:
http://sources.ru/delphi/delphi_system.shtml#17


 
NovyeVasyuki   (2004-05-07 15:44) [3]

Спасиба Романов Р.В.
Добавил
 si.dwFlags:=STARTF_USESHOWWINDOW;
 si.wShowWindow:=SW_MINIMIZE;
все заработало.



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

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

Наверх




Память: 0.47 MB
Время: 0.061 c
14-1083231096
Proteste
2004-04-29 13:31
2004.05.23
Хакеры кто они?


8-1078534226
gyry-9
2004-03-06 03:50
2004.05.23
TMediaPlayer


1-1083329590
jenbond
2004-04-30 16:53
2004.05.23
Конвертация компанента


4-1081256565
Kme
2004-04-06 17:02
2004.05.23
Безвозвратное удаление


6-1080739382
Max_
2004-03-31 17:23
2004.05.23
компонент twebbrouser