Frequently Asked Component Specific Questions
Options |
|
Display all FAQ items |
Displaying items 1 to 1 of 1, page 1 of 1
<< previous next >>
TMS Smooth Controls PackSelecting and displaying Disjunct Dates in AdvSmoothCalendar
To Select disjunct dates, just use the procedure SelectDisjunctDates and pass an array of TDateTime:
var d: TDateTime; begin d := Now; AdvSmoothCalendar1.SelectDisjunctDates([d, d+2, d+4]); end;
This will select the current date, the current date + 2 days and the current date + 4 days.
To display the selected dates you can loop through the DisjunctDates array:
var
I: Integer;
d: TDateTime;
begin
for I := 0 to Length(AdvSmoothCalendar1.DisjunctDates) - 1 do
begin
d := AdvSmoothCalendar1.DisjunctDates[i];
outputdebugstring(pchar(datetostr(d)));
end;