Source position: fpjson.pp line 792
type TJSONParserHandler = procedure(
AStream: TStream;
const AUseUTF8: Boolean;
out Data: TJSONData
);