TmnField

type TmnField = class(TmnCustomField)

protected

  function GetIsNull; override;

  procedure SetIsNull(); override;

  function GetValue; override;

  procedure SetValue(); override;

  function GetAsString; override;

  procedure SetAsString(); override;

public

  function GetFullString();

published

  property Value: Variant;

  property IsEmpty: Boolean;

  property IsNull: Boolean;

  property AsVariant: Variant;

  property AsString: string;

  property AsAnsiString: ansistring;

  property AsTrimString: string;

  property AsNullString: string;

  property AsInteger: Integer;

  property AsInt64: Int64;

  property AsDouble: Double;

  property AsBoolean: Boolean;

  property AsCurrency: Currency;

  property AsDate: TDateTime;

  property AsTime: TDateTime;

  property AsDateTime: TDateTime;

  property AsText: string;

  property AsHex: string;

  property Name: string; [rw]

end;

TmnField

TmnCustomField

TObject,IField