Source position: jsonreader.pp line 76
type TOnJSONString = procedure(
Sender: TObject;
const AValue: TJSONStringType
) of object;