| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Результат работы DOS программы. [D5, NT4, Win2k]
Andry © (2001-11-17 21:12:00)Доброго времени суток. Избитая тема - надо анализировать что, DOS прога выводит в консольное окно. Читал массу ответов на этот вопрос с примерами. Но все славно когда работаешь с 32 разрядными прогр. типа ping, а если arj2.5 :( Если создать консоль через AllocConsole то все хорошо, но потом не убить это окно FreeConsole не помогает.
Заранее благодарен за все ответы.
Delirium (2001-11-23 15:29:00) [1]В "Кладовке" есть TDosCommand - решает проблемы как в текстом, так и с "концом" работы
Владимир Чаплинский (2001-11-23 01:40:00) [2]может тебе это поможет?
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); //
| |
