Вопрос по stdin, stdout, delphi, tstream, console-application – Открытие TStream в stdin / stdout в консольном приложении Delphi

28

Я пытаюсь написать консольное приложение Delphi, которое создает TStream для своего стандартного ввода и другое TStream для своего стандартного вывода.

(Он будет запущен хост-приложением с перенаправлением ввода и вывода в каналы и будет передавать двоичные данные в / из этого хост-приложения, поэтому TStream будет гораздо лучше подходить для этой задачи, чем ReadLn / WriteLn.)

Как мне открыть TStream для стандартного ввода или стандартного вывода?

Ваш Ответ

1   ответ
37

  InputStream := THandleStream.Create(GetStdHandle(STD_INPUT_HANDLE));
  OutputStream := THandleStream.Create(GetStdHandle(STD_OUTPUT_HANDLE));

Дай что-нибудь ...

Error: User Rate Limit Exceeded Joe White
Error: User Rate Limit Exceeded
Error: User Rate Limit Exceeded
Error: User Rate Limit Exceeded

Похожие вопросы