paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 18:29:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* two constants added.

Browse Source 
git-svn-id: trunk@23420 -
This commit is contained in:
marco 2013-01-17 08:46:39 +00:00
parent 53b65300a6
commit 146011d523
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/winunits-base/src/shlobj.pp
View File

@ -876,6 +876,8 @@ Const
FOS_FORCESHOWHIDDEN = $10000000;
FOS_DEFAULTNOMINIMODE = $20000000;
FOS_FORCEPREVIEWPANEON = $40000000;
SHGFP_TYPE_CURRENT = 0; // shgetfolderpath, current value for user, verify it exists
SHGFP_TYPE_DEFAULT = 1; // shgetfolderpath, default value, may not exist
Type
SFGAOF = ULONG;