Source position: jsonreader.pp line 82
type TOnJSONQWord = procedure(
Sender: TObject;
const AValue: QWord
) of object;