Source position: fpdebugcapturesvc.pp line 30
type TDebugCaptureHandler = procedure(
aSender: TObject;
aCapture: TJSONData
) of object;