Source position: jsonreader.pp line 71
type TOnJSONBoolean = procedure(
Sender: TObject;
const AValue: Boolean
) of object;