Source position: fpjsonreport.pp line 35
type TReadReportJSONEvent = procedure(
Sender: TObject;
JSON: TJSONObject
) of object;