TField

type TField = class(TComponent)

protected

  function AccessError();

  procedure CheckInactive;

  procedure CheckTypeSize(); virtual;

  procedure Change; virtual;

  procedure DataChanged;

  procedure FreeBuffers; virtual;

  function GetAsBoolean; virtual;

  function GetAsCurrency; virtual;

  function GetAsLargeInt; virtual;

  function GetAsDateTime; virtual;

  function GetAsFloat; virtual;

  function GetAsLongint; virtual;

  function GetAsInteger; virtual;

  function GetAsVariant; virtual;

  function GetOldValue; virtual;

  function GetAsString; virtual;

  function GetAsWideString; virtual;

  function GetCanModify; virtual;

  function GetClassDesc; virtual;

  function GetDataSize; virtual;

  function GetDefaultWidth; virtual;

  function GetDisplayName;

  function GetCurValue; virtual;

  function GetNewValue; virtual;

  function GetIsNull; virtual;

  function GetParentComponent; override;

  procedure GetText(); virtual;

  function HasParent; override;

  procedure Notification(); override;

  procedure PropertyChanged();

  procedure ReadState(); override;

  procedure SetAsBoolean(); virtual;

  procedure SetAsCurrency(); virtual;

  procedure SetAsDateTime(); virtual;

  procedure SetAsFloat(); virtual;

  procedure SetAsLongint(); virtual;

  procedure SetAsInteger(); virtual;

  procedure SetAsLargeint(); virtual;

  procedure SetAsVariant(); virtual;

  procedure SetAsString(); virtual;

  procedure SetAsWideString(); virtual;

  procedure SetDataType();

  procedure SetNewValue();

  procedure SetSize(); virtual;

  procedure SetParentComponent(); override;

  procedure SetText(); virtual;

  procedure SetVarValue(); virtual;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Assign(); override;

  procedure AssignValue();

  procedure Clear; virtual;

  procedure FocusControl;

  function GetData();

  function IsBlob; virtual;

  function IsValidChar(); virtual;

  procedure RefreshLookupList;

  procedure SetData();

  procedure SetFieldType(); virtual;

  procedure Validate();

  property AsBoolean: Boolean; [rw]

  property AsCurrency: Currency; [rw]

  property AsDateTime: TDateTime; [rw]

  property AsFloat: Double; [rw]

  property AsLongint: LongInt; [rw]

  property AsLargeInt: LargeInt; [rw]

  property AsInteger: Integer; [rw]

  property AsString: String; [rw]

  property AsWideString: WideString; [rw]

  property AsVariant: variant; [rw]

  property AttributeSet: String; [rw]

  property Calculated: Boolean; [rw]

  property CanModify: Boolean; [r]

  property CurValue: Variant; [r]

  property DataSet: TDataSet; [rw]

  property DataSize: Word; [r]

  property DataType: TFieldType; [r]

  property DisplayName: String; [r]

  property DisplayText: String; [r]

  property FieldNo: LongInt; [r]

  property IsIndexField: Boolean; [r]

  property IsNull: Boolean; [r]

  property NewValue: Variant; [rw]

  property Offset: Word; [r]

  property Size: Word; [rw]

  property Text: String; [rw]

  property ValidChars: TFieldChars; [r]

  property Value: variant; [rw]

  property OldValue: variant; [r]

  property LookupList: TLookupList; [r]

published

  property AlignMent: TAlignMent; [rw]

  property CustomConstraint: String; [rw]

  property ConstraintErrorMessage: String; [rw]

  property DefaultExpression: String; [rw]

  property DisplayLabel: String; [rws]

  property DisplayWidth: LongInt; [rw]

  property FieldKind: TFieldKind; [rw]

  property FieldName: String; [rw]

  property HasConstraints: Boolean; [r]

  property Index: LongInt; [rw]

  property ImportedConstraint: String; [rw]

  property LookupDataSet: TDataSet; [rw]

  property LookupKeyFields: String; [rw]

  property LookupResultField: String; [rw]

  property KeyFields: String; [rw]

  property LookupCache: Boolean; [rw]

  property Origin: String; [rw]

  property ProviderFlags: TProviderFlags; [rw]

  property ReadOnly: Boolean; [rw]

  property Required: Boolean; [rw]

  property Visible: Boolean; [rw]

  property OnChange: TFieldNotifyEvent; [rw]

  property OnGetText: TFieldGetTextEvent; [rw]

  property OnSetText: TFieldSetTextEvent; [rw]

  property OnValidate: TFieldNotifyEvent; [rw]

end;

TField

TComponent

TObject