| Class TRkDBStatusControl (unit RkDbStat) |
| Constructors |
constructor Create( AOwner : TComponent );| Functions |
destructor Destroy;
procedure Notification( AComponent : TComponent;
Operation : TOperation );
procedure CMGetDataLink( var Msg : TMessage );
procedure DataChange( Sender : TObject );
function GetDataField : string;
function GetDataSource : TDataSource;
procedure SetDataField( const Value : string );
procedure SetDataSource( Value : TDataSource );
procedure SetFieldLabel( const Value : string );| Properties |
property Alignment :
property CaptionOffset :
property DataField : string
property DataSource : TDataSource
property FieldLabel : string| Events |
| Variables |
FDataLink : TFieldDataLink;
FFieldLabel : string;| Constructors |
constructor Create( AOwner : TComponent );================================} {== TRkDBStatusControl Methods ==} {================================
| Functions |
destructor Destroy;Assign event handler
procedure Notification( AComponent : TComponent;
Operation : TOperation );
procedure CMGetDataLink( var Msg : TMessage );Repaint with new FieldLabel
procedure DataChange( Sender : TObject );========================================================================= TRkDBStatusControl.DataChange This method gets called as a result of a number of different events: 1. The underlying field value changes. Occurs when changing the value of the column tied to this control and then move to a new column or a new record. 2. The corresponding Dataset goes into Edit mode. 3. The corresponding Dataset referenced by DataSource changes. 4. The current cursor is scrolled to a new record in the table. 5. The record is reset through a Cancel call. 6. The DataField property changes to reference another column. =========================================================================
function GetDataField : string;
function GetDataSource : TDataSource;
procedure SetDataField( const Value : string );
procedure SetDataSource( Value : TDataSource );
procedure SetFieldLabel( const Value : string );| Properties |
property Alignment : Inherited Properties
property CaptionOffset :
property DataField : string
property DataSource : TDataSource
property FieldLabel : string| Events |
| Variables |
FDataLink : TFieldDataLink;
FFieldLabel : string;