打开标准输入/ T流一个在德尔福控制台应用程序标准输出(Opening a TStream on s

2019-06-24 11:04发布

我试图写它的标准输入创建一个T流德尔福控制台应用程序,另一个T流为它的标准输出。

(这将通过与它的输入,并重定向到管道输出的宿主应用程序被启动,并且将来自该主机应用程序传递的二进制数据到/,所以T流会更好适合于比ReadLn / WriteLn的任务。)

我该如何去有关标准输入或标准输出打开一个T流?

Answer 1:

关闭我的头顶:

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

给一个去..



文章来源: Opening a TStream on stdin/stdout in a Delphi console app