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