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

Вниз

как использовать ExecuteConsoleAppIORedirect ?   Найти похожие ветки 

 
Dy1 ©   (2007-08-21 20:21) [0]

есть консольная прога, выводящая в консоль несколько строк. Как прочитать эти строки?

procedure TForm1.Button1Click(Sender: PObj);
var  s: string;
begin
ExecuteConsoleAppIORedirect("pack.exe 1.exe -c3 -test", "", "", SW_RESTORE, "", s, 2000);
form.Caption := int2str(length(s)) +" "+ s; // по нулям


 
Vladimir Kladov   (2007-08-21 20:29) [1]

Это вроде бы было сделано для старых dos-приложений и 16-разрядных, использующих stdin и stdout. Не уверен, что сработает для любого современного 32-разрядного консольного приложения. Хотя пробовал на де-архиваторах командной строки вроде unrar и unzip, работало, кажется (когда делал).


 
Дмитрий К ©   (2007-08-21 20:39) [2]


> Dy1 ©   (21.08.07 20:21)

Если не заработает, попробуй это:
http://thaddy.co.uk/consoledemo.zip



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
4-1186810295
Кирилл_А
2007-08-11 09:31
2008.04.13
bsToolWindow для WinApi


15-1204535379
Vemer
2008-03-03 12:09
2008.04.13
Ошибка с rtl60.bpl на новойм компьютере.


2-1205506618
Sesh
2008-03-14 17:56
2008.04.13
Компонент


15-1204017202
Правильный_Вася
2008-02-26 12:13
2008.04.13
FireBird - альтернатива


2-1206015131
WildBoolean
2008-03-20 15:12
2008.04.13
TListBox +OnDrawItem