Class TODCustomDBCalendar (unit ODDBCal)

Inherits from

TODCustomCalendar

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


procedure Loaded;


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


procedure DoChange;


procedure FinishDataChange(Sender: TObject);


procedure StartDataChange(Sender: TObject);

if not moving to another record

procedure UpdateFinishData(Sender: TObject);


procedure UpdateStartData(Sender: TObject);


function GetDataSource: TDataSource;


function GetFinishDateField: TField;


function GetFinishDateName: string;


function GetStartDateField: TField;


function GetStartDateName: string;


procedure SetDataSource(Value: TDataSource);


procedure SetFinishDateName(const Value: string);


procedure SetStartDateName(const Value: string);


Properties

property DataSource : TDataSource


property FinishDateField : TField


property FinishDateName : string


property StartDateField : TField


property StartDateName : string


Events

Variables

FBrowsing : Boolean;


FFinishDateLink : TFieldDataLink;


FStartDateLink : TFieldDataLink;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


procedure Loaded;


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


procedure DoChange;


procedure FinishDataChange(Sender: TObject);


procedure StartDataChange(Sender: TObject);

if not moving to another record


procedure UpdateFinishData(Sender: TObject);


procedure UpdateStartData(Sender: TObject);


function GetDataSource: TDataSource;


function GetFinishDateField: TField;


function GetFinishDateName: string;


function GetStartDateField: TField;


function GetStartDateName: string;


procedure SetDataSource(Value: TDataSource);


procedure SetFinishDateName(const Value: string);


procedure SetStartDateName(const Value: string);


Properties


property DataSource : TDataSource


property FinishDateField : TField


property FinishDateName : string


property StartDateField : TField


property StartDateName : string


Events


Variables


FBrowsing : Boolean;


FFinishDateLink : TFieldDataLink;


FStartDateLink : TFieldDataLink;