TFZDBGeneralEdit

type TFZDBGeneralEdit = class(TFZGeneralEdit)

protected

  procedure Notification(); override;

  procedure DataChange();

  procedure ModifyRecord;

  procedure UpdateData();

  procedure CmExit(); message;

  procedure InternalUpdateRecord;

  procedure SetChecked(); override;

  procedure SetListFields();

  procedure SetLookupFields();

  procedure DoClearKey; override;

  procedure KeyDown(); override;

  procedure KeyPress(); override;

public

  constructor Create(); override;

  destructor Destroy; override;

  property Field: TField; [r]

  property ValueChecked: string; [rw]

  property ValueUnChecked: string; [rw]

  property ListDataSet: TDataSet; [rw]

  property KeyFields: string; [rw]

  property ListFields: string; [rw]

  property LookupFields: string; [rw]

  property OnEditReference: TNotifyEvent; [rw]

published

  property DataSource: TDataSource; [rw]

  property DataField: string; [rw]

end;

TFZDBGeneralEdit

TFZGeneralEdit

TFZControlEx

TFZControl

TObject