Source position: fpjsonrtti.pp line 130
type TJSONGetObjectEvent = procedure(
Sender: TOBject;
AObject: TObject;
Info: PPropInfo;
AData: TJSONObject;
DataName: TJSONStringType;
var AValue: TObject
);