Консольные приложения

← →
Oak (2002-03-25 13:32) [0]

Хай! Проблема>> моя прога(веб-сервер) запускает процесс, являющийся консольным приложением (скрипт). Как бы мне прочесть, то что он (скрипт) выводит в консоль? В ReadConsole надо помимо прочего передавать hConsoleInput (тип HANDLE)... а как мне его получать?

← →
Юрий Зотов © (2002-03-25 15:27) [1]

1. Сначала вызовите AllocConsole
2. Используйте CreateProcess с bInheritHandles = True.
3. В StartupInfo пропишите:
- dwFlag с STARTF_USESTDHANDLES
- hStdInput = GetStdHandle(STD_INPUT_HANDLE)
4. Это и будет нужный Вам хэндл.
5. Не освобождайте хэндл дочернего процесса раньше времени.
6. В конце вызовите FreeConsole

← →
Витамин (2002-03-25 22:03) [2]

А нельзя ли пример?

← →
VuDZ © (2002-03-26 01:01) [3]

господи, ну не ужели все на столько ленивые?
http://delphi.vitpc.com/mastering/part_1.htm

← →
ION T (2002-03-26 15:10) [4]

Вот пример описанного выше способа (имхо намного проще, но с одним недостатком по сравнению с трубой - можно прочитать только видимый буфер, т.е. если что-то проскроллировалось вверх, то его уже не достанешь):

http://iont.virtualave.net/pub/delphi/readconsole.zip

Консольные приложения Найти похожие ветки