TSqldbResource

type TSqldbResource = class(TRESTResource)

protected

  procedure DecodeJSONFields();

  procedure EncodeJSONFields();

  function GetQuery();

  function GetResourceIdentifierSQL;

  class function GetSelectSQL; virtual;

  function InsertRecord(); virtual;

  procedure Loaded(); override;

  procedure PrepareParams(); virtual;

  procedure PrepareQuery(); virtual;

  procedure PrepareResponse(); virtual;

  procedure SetPrimaryKeyData();

  procedure SetQueryData(); virtual;

public

  constructor Create; override;

  destructor Destroy; override;

  procedure HandleGet(); override;

  procedure HandleDelete(); override;

  procedure HandlePatch(); override;

  procedure HandlePost(); override;

  procedure HandlePut(); override;

  property ConditionsSQL: string; [rw]

  property Connection: TSQLConnection; [rw]

  property DefaultConnection: TSQLConnection; [rw]

  property IgnoreNotFound: Boolean; [rw]

  property InputFields: string; [rw]

  property IsCollection: Boolean; [rw]

  property JSONFields: string; [rw]

  property OutputFields: string; [rw]

  property PreserveCase: Boolean; [rw]

  property PrimaryKey: string; [rw]

  property PrimaryKeyParam: string; [rw]

  property PutAsPatch: Boolean; [rw]

  property QueryParams: string; [rw]

  property ReadOnly: Boolean; [rw]

  property SelectSQL: string; [rw]

end;

TSqldbResource

TRESTResource

TObject