Source position: rlreport.pas line 170
type TRLBeforeTextEvent = procedure(
Sender: TObject;
var OutputText: string;
var PrintIt: Boolean
) of object;