Source position: dbgintfdebuggerbase.pp line 631
type TIDELineInfoEvent = procedure(
const ASender: TObject;
const ASource: string
) of object;