paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-06 15:58:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

DateTimePicker: Add comments which describe options

Browse Source 
git-svn-id: trunk@63867 -
This commit is contained in:
zoran 2020-09-05 08:29:10 +00:00
parent 03920381a6
commit 959c6b9cd3
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
components/datetimectrls/datetimepicker.pas
View File

@ -119,8 +119,17 @@ type
dtaDefault means it is determined by BiDiMode }
TDTCalAlignment = (dtaLeft, dtaRight, dtaDefault);
TDateTimePickerOption = (dtpoDoChangeOnSetDateTime, dtpoEnabledIfUnchecked,
dtpoAutoCheck, dtpoFlatButton, dtpoResetSelection);
TDateTimePickerOption = (
dtpoDoChangeOnSetDateTime, // The OnChange handler will be called also when
// date/time is programatically changed.
dtpoEnabledIfUnchecked, // Enable the date time picker if the checkbox is unchecked.
dtpoAutoCheck, // Auto-check an unchecked checkbox when DateTime is changed
// (makes sense only if dtpoEnabledIfUnchecked is set).
dtpoFlatButton, // Use flat button for calender picker.
dtpoResetSelection // When the control receives focus, the selection is always
// in the first part (the control does not remember which part was previously selected).
);
TDateTimePickerOptions = set of TDateTimePickerOption;
{ TCustomDateTimePicker }
@ -3868,7 +3877,9 @@ begin
FCenturyFrom := 1941;
FRecalculatingTextSizesNeeded := True;
FOnChange := nil;
FOnChangeHandlers := nil;
FOnCheckBoxChange := nil;
FOnCheckBoxChangeHandlers := nil;
FSeparatorWidth := 0;
FSepNoSpaceWidth := 0;
FDigitWidth := 0;