Source position: extjsjson.pp line 49
type TJSONObjectEvent = procedure(
Sender: TObject;
AObject: TJSONObject
) of object;