Class TDBBitwiseRadioButton (unit Bitwise)

Inherits from

TRadioButton

Constructors


constructor Create( owner: TComponent );

A change to the underlying data is reflected in the state of the RadioButton.


Functions

destructor Destroy;


procedure MouseUp( Button: TMouseButton; Shift: TShiftState; X, Y: Integer );


procedure KeyPress( var Key: Char );


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


procedure CMExit( var Message: TCMExit );


procedure CMToggle( var Message: TWMNCLButtonUp );


procedure DataChange( sender: TObject );

for now we assume that one of the buttons must be selected.

function GetDataField: String;

TDBBitwiseRadioButton

function GetDataSource: TDataSource;


procedure SetDataField( const value: String );


procedure SetDataSource( value: TDataSource );


procedure UpdateData( Sender: TObject );


Properties

property CheckValue : Integer


property DataField : String


property DataSource : TDataSource


Events

Variables

FDataLink : TFieldDataLink;


myCheckValue : Integer;



Constructors


constructor Create( owner: TComponent );

A change to the underlying data is reflected in the state of the RadioButton.


Functions


destructor Destroy;


procedure MouseUp( Button: TMouseButton; Shift: TShiftState; X, Y: Integer );


procedure KeyPress( var Key: Char );


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


procedure CMExit( var Message: TCMExit );


procedure CMToggle( var Message: TWMNCLButtonUp );


procedure DataChange( sender: TObject );

for now we assume that one of the buttons must be selected...


function GetDataField: String;

TDBBitwiseRadioButton


function GetDataSource: TDataSource;


procedure SetDataField( const value: String );


procedure SetDataSource( value: TDataSource );


procedure UpdateData( Sender: TObject );


Properties


property CheckValue : Integer


property DataField : String


property DataSource : TDataSource


Events


Variables


FDataLink : TFieldDataLink;


myCheckValue : Integer;