Source position: dbgintfdebuggerbase.pp line 1501
type TDBGEventNotify = procedure(
Sender: TObject;
const ACategory: TDBGEventCategory;
const AEventType: TDBGEventType;
const AText: string
) of object;