TField

type TField = class(TComponent)

protected

  function AccessError();

  procedure CheckInactive;

  class procedure CheckTypeSize(); virtual;

  procedure Change; virtual;

  procedure Bind(); virtual;

  procedure DataChanged;

  procedure FreeBuffers; virtual;

  function GetAsBCD; virtual;

  function GetAsBoolean; virtual;

  function GetAsBytes; virtual;

  function GetAsCurrency; virtual;

  function GetAsDateTime; virtual;

  function GetAsExtended; virtual;

  function GetAsFloat; virtual;

  function GetAsLargeInt; virtual;

  function GetAsLongint; virtual;

  function GetAsLongWord; virtual;

  function GetAsInteger; virtual;

  function GetAsVariant; virtual;

  function GetOldValue; virtual;

  function GetAsSingle; virtual;

  function GetAsString; virtual;

  function GetAsAnsiString; virtual;

  function GetAsUnicodeString; virtual;

  function GetAsUTF8String; 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 SetAsBCD(); virtual;

  procedure SetAsBoolean(); virtual;

  procedure SetAsBytes(); virtual;

  procedure SetAsCurrency(); virtual;

  procedure SetAsDateTime(); virtual;

  procedure SetAsExtended(); virtual;

  procedure SetAsFloat(); virtual;

  procedure SetAsLargeInt(); virtual;

  procedure SetAsLongint(); virtual;

  procedure SetAsLongWord(); virtual;

  procedure SetAsInteger(); virtual;

  procedure SetAsVariant(); virtual;

  procedure SetAsSingle(); virtual;

  procedure SetAsString(); virtual;

  procedure SetAsAnsiString(); virtual;

  procedure SetAsUnicodeString(); virtual;

  procedure SetAsUTF8String(); virtual;

  procedure SetAsWideString(); virtual;

  procedure SetDataset(); virtual;

  procedure SetDataType();

  procedure SetNewValue();

  procedure SetSize(); virtual;

  procedure SetParentComponent(); override;

  procedure SetParentField(); virtual;

  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();

  class function IsBlob; virtual;

  function IsValidChar(); virtual;

  procedure RefreshLookupList;

  procedure SetData();

  procedure SetFieldType(); virtual;

  procedure Validate();

  property AsBCD: TBCD; [rw]

  property AsBoolean: Boolean; [rw]

  property AsBytes: TBytes; [rw]

  property AsCurrency: Currency; [rw]

  property AsDateTime: TDateTime; [rw]

  property AsExtended: Extended; [rw]

  property AsFloat: Double; [rw]

  property AsLongint: LongInt; [rw]

  property AsLongWord: LongWord; [rw]

  property AsLargeInt: LargeInt; [rw]

  property AsInteger: LongInt; [rw]

  property AsSingle: Single; [rw]

  property AsString: string; [rw]

  property AsAnsiString: AnsiString; [rw]

  property AsUnicodeString: UnicodeString; [rw]

  property AsUTF8String: UTF8String; [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: Integer; [r]

  property DataType: TFieldType; [r]

  property DisplayName: string; [r]

  property DisplayText: string; [r]

  property EditMask: TEditMask; [rw]

  property EditMaskPtr: TEditMask; [r]

  property FieldNo: LongInt; [r]

  property IsIndexField: Boolean; [r]

  property IsNull: Boolean; [r]

  property NewValue: Variant; [rw]

  property Offset: Word; [r]

  property Size: Integer; [rw]

  property Text: string; [rw]

  property ValidChars: TFieldChars; [rw]

  property Value: variant; [rw]

  property OldValue: variant; [r]

  property LookupList: TLookupList; [r]

  property FieldDef: TFieldDef; [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; [rws]

  property FieldKind: TFieldKind; [rw]

  property FieldName: string; [rw]

  property HasConstraints: Boolean; [r]

  property Index: LongInt; [rw]

  property ImportedConstraint: string; [rw]

  property KeyFields: string; [rw]

  property LookupCache: Boolean; [rw]

  property LookupDataSet: TDataSet; [rw]

  property LookupKeyFields: string; [rw]

  property LookupResultField: string; [rw]

  property Lookup: Boolean; [rws] deprecated ;

  property Origin: string; [rw]

  property ParentField: TObjectField; [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

TObject