| Class TDateDialog (unit DateDialog) |
TComponent
| Constructors |
constructor Create(AOwner : TComponent);| Functions |
function Execute : boolean;
function GetADate(ADate : TDateTime): TDateTime;
function ShowNormal (Index : integer) : integer;
procedure UpdateDate (Index : integer; Value : integer);| Properties |
property Day : integer
property DialogCaption : string
property DialogLeft : integer
property DialogPosition : TPosition
property DialogTop : integer
property Month : integer
property Tag :
property UseToday : boolean
property Year : integer| Events |
| Variables |
ResultDate : TDateTime;
DCaption : string;
DDay : integer;
DLeft : integer;
DMonth : integer;
DPosition : TPosition;
DStartDate : TDateTime;
DTop : integer;
DUseToday : boolean;
DYear : integer;| Constructors |
constructor Create(AOwner : TComponent);-----------------------------------------------------------------------------} {------------------------------------------ Do standard settings on creation -
| Functions |
function Execute : boolean;-----------------------------------------------------------------------------} {-------------------------------------------------------- Execute the dialog -
function GetADate(ADate : TDateTime): TDateTime;-----------------------------------------------------------------------------} {---------------------------------------------------- Alternative to Execute -
function ShowNormal (Index : integer) : integer;-----------------------------------------------------------------------------} {------------------------------------------ Make TDateTime readable for user -
procedure UpdateDate (Index : integer; Value : integer);-----------------------------------------------------------------------------} {--------------------- Updating TDateTime if user changes Day, Month or Year -
| Properties |
property Day : integer
property DialogCaption : string
property DialogLeft : integer
property DialogPosition : TPosition
property DialogTop : integer
property Month : integer
property Tag :
property UseToday : boolean
property Year : integerPublished declarations
| Events |
| Variables |
ResultDate : TDateTime;Public declarations
DCaption : string;
DDay : integer;
DLeft : integer;
DMonth : integer;
DPosition : TPosition;
DStartDate : TDateTime;
DTop : integer;
DUseToday : boolean;
DYear : integer;Private declarations