Source position: pasuseanalyzer.pas line 121
type TPAMessageEvent = procedure(
Sender: TObject;
Msg: TPAMessage
) of object;