paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-07 20:46:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

TaskDialog: add comments to TTaskDialogFlag definitions.

Browse Source
This commit is contained in:
Bart 2023-08-17 19:05:30 +02:00
parent 90ab2ac4c7
commit 0112fc4456
1 changed files with 25 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
lcl/dialogs.pp
View File

@ -535,17 +535,31 @@ type
type type
TCustomTaskDialog = class; TCustomTaskDialog = class;
TTaskDialogFlag = (tfEnableHyperlinks, tfUseHiconMain, TTaskDialogFlag = (
tfUseHiconFooter, tfAllowDialogCancellation, tfEnableHyperlinks, //Native Vista+ only
tfUseCommandLinks, tfUseCommandLinksNoIcon, tfUseHiconMain, //Not functional
tfExpandFooterArea, tfExpandedByDefault, tfUseHiconFooter, //Not functional
tfVerificationFlagChecked, tfShowProgressBar, tfAllowDialogCancellation,
tfShowMarqueeProgressBar, tfCallbackTimer, tfUseCommandLinks,
tfPositionRelativeToWindow, tfRtlLayout, tfUseCommandLinksNoIcon,
tfNoDefaultRadioButton, tfCanBeMinimized, tfExpandFooterArea,
tfNoSetForeGround, tfSizeToContent, tfExpandedByDefault,
tfForceNonNative, tfEmulateClassicStyle, tfVerificationFlagChecked,
tfQuery, tfSimpleQuery, tfQueryFixedChoices, tfQueryFocused); tfShowProgressBar, //Native Vista+ only, not fully functional
tfShowMarqueeProgressBar, //Native Vista+ only, not fully functional
tfCallbackTimer,
tfPositionRelativeToWindow,
tfRtlLayout, //Native Vista+ only
tfNoDefaultRadioButton,
tfCanBeMinimized,
tfNoSetForeGround, //Native Vista+ only
tfSizeToContent, //Native Vista+ only
tfForceNonNative,
tfEmulateClassicStyle, //this and following flags: Emulated dialog only
tfQuery,
tfSimpleQuery,
tfQueryFixedChoices,
tfQueryFocused);
TTaskDialogFlags = set of TTaskDialogFlag; TTaskDialogFlags = set of TTaskDialogFlag;
TTaskDialogCommonButton = (tcbOk, tcbYes, tcbNo, tcbCancel, tcbRetry, tcbClose); TTaskDialogCommonButton = (tcbOk, tcbYes, tcbNo, tcbCancel, tcbRetry, tcbClose);