Class TDbCalendar97 (unit DtCaDb97)

Inherits from

TCalendar97

***************************************************************************** TDbCalendar97 Derived from tCalendar97 Properties DataSource, DataField : Database informations ReadOnly : Can modify field Author name=BOURMAD Mehdi Author E-mail=bourmad@mygale.org Author URL=www.mygale.org/~bourmad

Constructors


constructor Create(AOwner: TComponent);

-------------------------------------------------------------} {-------------------- TDbCalendar97 --------------------------} {-------------------------------------------------------------


Functions

destructor Destroy;


procedure DateChange(Sender: TObject);


function GetDate: TDateTime;


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


procedure SetDate(dtArg: TDateTime);


procedure CMExit(var Message: TCMExit);


procedure DataChange(Sender: TObject);


function GetDataField: string;


function GetDataSource: TDataSource;


function GetField: TField;


function GetReadOnly: Boolean;


procedure SetDataField(const Value: string);


procedure SetDataSource(Value: TDataSource);


procedure SetReadOnly(Value: Boolean);


Properties

property DataField : string


property DataSource : TDataSource


property ReadOnly : Boolean


property Date : TDateTime


property Field : TField


Events

Variables

FAlignment : TAlignment;


FCanvas : TControlCanvas;


FDataLink : TFieldDataLink;


FFocused : Boolean;



Constructors


constructor Create(AOwner: TComponent);

-------------------------------------------------------------} {-------------------- TDbCalendar97 --------------------------} {-------------------------------------------------------------


Functions


destructor Destroy;


procedure DateChange(Sender: TObject);


function GetDate: TDateTime;


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


procedure SetDate(dtArg: TDateTime);


procedure CMExit(var Message: TCMExit);


procedure DataChange(Sender: TObject);


function GetDataField: string;


function GetDataSource: TDataSource;


function GetField: TField;


function GetReadOnly: Boolean;


procedure SetDataField(const Value: string);


procedure SetDataSource(Value: TDataSource);


procedure SetReadOnly(Value: Boolean);


Properties


property DataField : string


property DataSource : TDataSource


property ReadOnly : Boolean


property Date : TDateTime


property Field : TField


Events


Variables


FAlignment : TAlignment;


FCanvas : TControlCanvas;


FDataLink : TFieldDataLink;


FFocused : Boolean;