paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-07 19:50:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

shlobj: add more SHARD_ constants

Browse Source 
git-svn-id: trunk@16357 -
This commit is contained in:
paul 2010-11-18 01:47:12 +00:00
parent 969c81b60f
commit f0c3084bee
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -519,9 +519,14 @@ Const
QITIPF_USESLOWTIP = $00000008; // Flag says it's OK to take a long time generating tip
QIF_CACHED = $00000001;
QIF_DONTEXPANDFOLDER= $00000002;
SHARD_PIDL = DWord($00000001);
SHARD_PATHA = DWord($00000002);
SHARD_PATHW = DWord($00000003);
SHARD_PIDL = DWord($00000001);
SHARD_PATHA = DWord($00000002);
SHARD_PATHW = DWord($00000003);
SHARD_APPIDINFO = DWord($00000004);
SHARD_APPIDINFOIDLIST = DWord($00000005);
SHARD_LINK = DWord($00000006);
SHARD_APPIDINFOLINK = DWord($00000007);
SHARD_SHELLITEM = DWord($00000008);
PRF_VERIFYEXISTS = $0001;
PRF_TRYPROGRAMEXTENSIONS = ($0002 or PRF_VERIFYEXISTS);
PRF_FIRSTDIRDEF = $0004;