| Class TDBDateTimePicker (unit DBDateTimePicker) |
TDateTimePicker
************************ TDBDateTimePicker - v1.0 ************************ The TDBDateTimePicker is a simple component descended from TDateTimePicker. When I installed Delphi 3 I noticed that the TDateTimePicker wasn't data aware and that's what I need. I wrote it and all other Delphi developers can now be saved some hassle. This is a simple unit and carries no warranties, expressed or implied. Use it at your own risk. Installation ------------ Add this unit (DBDateTimePciker.pas' to any of your Delphi 3 packages. Current Limitations ------------------- Currently TDBDateTimePicker only works with dates, not time or DateTime. If someone get's around to implementing it before I do, I'd appreciate a copy. Written By ---------- Simon Munro Paradoxical Business Solutions simon@delphi.co.za www.delphi.co.za Check my web site for later versions Copyright © 1997 Paradoxical Business Solutions Please ensure that this comment section remains unchanged.
| Constructors |
constructor Create(Aowner: TComponent);| Functions |
destructor Destroy;
procedure Change(Sender: TObject);
procedure CMExit(var Message: TWMNoParams);
procedure DataChange(Sender: TObject);
function GetDataField: string;
function GetDataSource: TDataSource;
procedure SetDataField(const Value: string);
procedure SetDataSource(Value: TDataSource);| Properties |
property DataField : string
property DataSource : TDataSource| Events |
| Variables |
FAllowChange : Boolean;
FDataLink : TFieldDataLink;| Constructors |
constructor Create(Aowner: TComponent);Public declarations
| Functions |
destructor Destroy;
procedure Change(Sender: TObject);
procedure CMExit(var Message: TWMNoParams);
procedure DataChange(Sender: TObject);
function GetDataField: string;
function GetDataSource: TDataSource;
procedure SetDataField(const Value: string);
procedure SetDataSource(Value: TDataSource);| Properties |
property DataField : stringPublished declarations
property DataSource : TDataSource| Events |
| Variables |
FAllowChange : Boolean;Private declarations
FDataLink : TFieldDataLink;