Source position: jsonreader.pp line 75
type TOnJSONInteger = procedure(
Sender: TObject;
const AValue: Integer
) of object;