TAPIClientCodeGen

type TAPIClientCodeGen = class(TPascalCodeGenerator)

protected

  function BaseUnits; override;

  function StringToJSType();

  procedure GenerateServiceClassDeclarations(); virtual;

  procedure GenerateServiceDeclaration(); virtual;

  procedure GenerateServiceMethodDeclaration(); virtual;

  procedure GenerateServiceClassImplementations(); virtual;

  procedure GenerateServiceImplementation(); virtual;

  procedure GenerateServiceMethodImplementation(); virtual;

  procedure GenerateRPCClassNameImplementation(); virtual;

  function GetServiceClassName(); virtual;

  function GetServiceMethodName(); virtual;

  function GetServiceMethodParamName(); virtual;

  function GetServiceMethodParamType(); virtual;

  function GetServiceMethodParamDefault(); virtual;

  function GetServiceMethodResultHandler(); virtual;

  procedure FillAPIServices(); virtual;

  procedure FillAPIMethod(); virtual;

  procedure FillAPIMethodParam(); virtual;

  procedure FillAPIService(); virtual;

public

  constructor Create(); override;

  procedure Execute;

  property API: TJSONObject; [rw]

  property Options: TClientCodeOptions; [rw]

  property ServiceParentClass: string; [rw]

end;

TAPIClientCodeGen

TObject