TCustomJSONRPCHandler

type TCustomJSONRPCHandler = class(TComponent)

protected

  function CreateParamDefs; virtual;

  procedure DoCheckParams(); virtual;

  procedure DoCheckParamDefsOnObject(); virtual;

  procedure DoCheckParamArray(); virtual;

  function DoExecute(); virtual;

  property BeforeExecute: TNotifyEvent; [rw]

  property AfterExecute: TNotifyEvent; [rw]

  property OnParamError: TJSONParamErrorEvent; [rw]

  property Options: TJSONRPCOptions; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure CheckParams();

  function ParamByName();

  procedure SetRequestClassAndMethod(); virtual;

  function Execute();

  property ParamDefs: TJSONParamDefs; [rw]

  property ResultType: TJSONtype; [rw]

  property RPCMethodName: string; [rw]

end;

TCustomJSONRPCHandler

TObject