Скачать: 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 вся ветка

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



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