Class TPDBBitBtn (unit Dbbtn)

Inherits from

TBitBtn

Constructors


constructor Create(Owner: TComponent);



Functions

destructor Destroy;


procedure CmGetDataLink(var Msg: TMessage);

In Delphi 2.

procedure DataChange(Sender: TObject);

The record changed, so update the Enabled to match.

function GetDataField: string;

Return the name of the linked database field.

function GetDataSource: TDataSource;

Return a reference to the data source, or nil.

procedure Notification(Component: TComponent; Operation: TOperation);

If the DataSource component is removed from the form, then clear the DataSource pointer in the data link.

procedure SetDataField(const Field: string);

Change the database field name.

procedure SetDataSource(DataSource: TDataSource);

Change the data source.

procedure SetReverseLogic(Value: boolean);

Refresh the link when ReverseLogic is changed

Properties

property DataField : string


property DataSource : TDataSource


property ReverseLogic : Boolean


Events

Variables

fDataLink : TFieldDataLink;


FReverseLogic : Boolean;



Constructors


constructor Create(Owner: TComponent);


Functions


destructor Destroy;


procedure CmGetDataLink(var Msg: TMessage);

In Delphi 2.0, a data aware control must respond to the Cm_GetDataLink message by returning its data link reference.


procedure DataChange(Sender: TObject);

The record changed, so update the Enabled to match.


function GetDataField: string;

Return the name of the linked database field.


function GetDataSource: TDataSource;

Return a reference to the data source, or nil.


procedure Notification(Component: TComponent; Operation: TOperation);

If the DataSource component is removed from the form, then clear the DataSource pointer in the data link.


procedure SetDataField(const Field: string);

Change the database field name.


procedure SetDataSource(DataSource: TDataSource);

Change the data source. In Delphi 2.0, request notification if the DataSource component is removed from the form.


procedure SetReverseLogic(Value: boolean);

Refresh the link when ReverseLogic is changed


Properties


property DataField : string


property DataSource : TDataSource


property ReverseLogic : Boolean


Events


Variables


fDataLink : TFieldDataLink;


FReverseLogic : Boolean;