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