Source position: jsonreader.pp line 72
type TOnJSONFloat = procedure(
Sender: TObject;
const AValue: TJSONFloat
) of object;