TBaseDateRemotable

type TBaseDateRemotable = class(TAbstractSimpleRemotable)

protected

  function GetDatepart(); virtual;

  procedure SetDate(); virtual;

public

  class procedure Save(); override;

  class procedure Load(); override;

  class function ToStr();

  class function Parse(); virtual; abstract;

  class function ParseToUTC();

  procedure Assign(); override;

  function Equal(); override;

  function wstHasValue; override;

  property AsDate: TDateTime; [rw]

  property AsUTCDate: TDateTime; [rw]

  property Year: Integer; [r]

  property Month: Integer; [r]

  property Day: Integer; [r]

  property HourOffset: ShortInt; [rw]

  property MinuteOffset: ShortInt; [rw]

  property AsString: string; [rw]

end;

TBaseDateRemotable

TAbstractSimpleRemotable

TBaseRemotable

TObject