Source position: fpjsonrtti.pp line 129
type TJSONPropertyErrorEvent = procedure(
Sender: TObject;
AObject: TObject;
Info: PPropInfo;
AValue: TJSONData;
Error: Exception;
var Continue: Boolean
) of object;