Главная страница
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.027 c
1-1084075854
glGLU
2004-05-09 08:10
2004.05.23
ListBox & Message


3-1083218629
direqtor
2004-04-29 10:03
2004.05.23
Ошибка при работе с отчетами Access


14-1083470203
Думкин
2004-05-02 07:56
2004.05.23
С днем рождения! 2 мая.


1-1083928124
Tomkat
2004-05-07 15:08
2004.05.23
Модульное приложение в Delphi


11-1072250148
PVOzerski
2003-12-24 10:15
2004.05.23
Новости от FPC Team