s2.tools.is2field.pas

来自「轉載的程序應用框架」· PAS 代码 · 共 20 行

unit S2.Tools.IS2Field;

interface

uses
  S2.Tools.TS2Object;

type
  IS2Field = interface
    function GetFieldCatpion: string;
    function GetFieldName: string;
    function GetValueAsObject: TS2Object;
    procedure SetFieldCapion(const FieldCaption: string);
    procedure SetFieldName(const FieldName: string);
    procedure SetValueAsObject(O: TS2Object);
  end;

implementation

end.