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