Source position: dbgintfdebuggerbase.pp line 1523
type TDBGEvaluateResultCallback = procedure(
Sender: TObject;
ASuccess: Boolean;
ResultText: string;
ResultDBGType: TDBGType
) of object;