Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.28;
Скачать: [xml.tar.bz2];




Вниз

Результат работы DOS программы. 


Andry   (2001-11-17 21:12) [0]

Доброго времени суток. Избитая тема - надо анализировать что, DOS прога выводит в консольное окно. Читал массу ответов на этот вопрос с примерами. Но все славно когда работаешь с 32 разрядными прогр. типа ping, а если arj2.5 :( Если создать консоль через AllocConsole то все хорошо, но потом не убить это окно FreeConsole не помогает.
Заранее благодарен за все ответы.



Владимир Чаплинский   (2001-11-23 01:40) [1]

может тебе это поможет?

function RunAndGrab(cmd:string):string;
var
si:STARTUPINFO;
c:char;
fs,rc:cardinal;
pi:_Process_Information;
tRead,cWrite:Thandle;
prh,exc:cardinal;
sa:TSecurityAttributes;
begin
result:="";
fillchar(si,sizeof(si),0);
fillchar(pi,sizeof(pi),0);
si.cb:=SizeOf(si);
si.dwFlags:=STARTF_USESTDHANDLES or STARTF_USESHOWWINDOW;
si.wShowWindow:=SW_HIDE;

sa.nLength:=sizeof(sa); //



Delirium   (2001-11-23 15:29) [2]

В "Кладовке" есть TDosCommand - решает проблемы как в текстом, так и с "концом" работы




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.28;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.014 c
3-90506           DenKop                2002-02-04 20:25  2002.02.28  
Удаление всех записей из БД


7-90686           NewMax                2001-11-23 13:07  2002.02.28  
Генератор гармонических колебаний из звуковухи??


3-90468           VIB                   2002-02-01 17:27  2002.02.28  
SQL+


3-90502           Bormanoid             2002-02-04 16:47  2002.02.28  
Размещение динамически создаваемых компонентов в *.dpr


3-90443           Blunder               2002-01-31 22:50  2002.02.28  
Как получить имена всех индексов в IB 5.x ?