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