Source position: _crw_pipe.pas line 127
type TPipeReporter = procedure(
Pipe: TPipe;
When: Double;
const What: LongString;
Code: Integer
);