在Delphi控制台应用程序中打开stdin / stdout上的TStream

I'm trying to write a Delphi console application that creates a TStream for its standard input, and another TStream for its standard output.I'm trying to write a Delphi console applicatio