Source position: fpjsonrpc.pp line 311
type TJSONRPCHandlerEvent = procedure(
Sender: TObject;
AHandler: TCustomJSONRPCHandler
) of object;