Source position: pipes.pp line 63
procedure CreatePipeStreams(
var InPipe: TInputPipeStream;
var OutPipe: TOutputPipeStream;
APipeBufferSize: Cardinal = 1024
);