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

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



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