From 33ca6e72f4833573f490ebfcc16fa54e990a863e Mon Sep 17 00:00:00 2001 From: michael Date: Sat, 31 Jan 2004 23:34:37 +0000 Subject: [PATCH] + Added header/log footer --- rtl/win32/shfolder.pp | 52 ++++++++++++++++++++++++++++++------------- 1 file changed, 37 insertions(+), 15 deletions(-) diff --git a/rtl/win32/shfolder.pp b/rtl/win32/shfolder.pp index 649d2c5212..4110f2ed66 100644 --- a/rtl/win32/shfolder.pp +++ b/rtl/win32/shfolder.pp @@ -1,3 +1,19 @@ +{ + $Id$ + This file is part of the Free Pascal run time library. + Copyright (c) 1999-2000 by the Free Pascal development team + + Interface to shfolder.dll + + See the file COPYING.FPC, included in this distribution, + for details about the copyright. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. + + **********************************************************************} + { --------------------------------------------------------------------- shfolder.dll is distributed standard with IE5.5, so it should ship with 2000/XP or higher but is likely to be installed on NT/95/98 or @@ -31,23 +47,23 @@ Const LibName = 'SHFolder.dll'; Const - CSIDL_PERSONAL = $0005; { %USERPROFILE%\My Documents } - CSIDL_APPDATA = $001A; { %USERPROFILE%\Application Data (roaming) } - CSIDL_LOCAL_APPDATA = $001C; { %USERPROFILE%\Local Settings\Application Data (non roaming) } - CSIDL_INTERNET_CACHE = $0020; { %USERPROFILE%\Local Settings\Temporary Internet Files} - CSIDL_COOKIES = $0021; { %USERPROFILE%\Cookies} - CSIDL_HISTORY = $0022; { %USERPROFILE%\Local settings\History} - CSIDL_COMMON_APPDATA = $0023; { %PROFILESPATH%\All Users\Application Data } - CSIDL_WINDOWS = $0024; { %SYSTEMROOT% } - CSIDL_SYSTEM = $0025; { %SYSTEMROOT%\SYSTEM32 (may be system on 95/98/ME) } - CSIDL_PROGRAM_FILES = $0026; { %SYSTEMDRIVE%\Program Files } - CSIDL_MYPICTURES = $0027; { %USERPROFILE%\My Documents\My Pictures } - CSIDL_PROGRAM_FILES_COMMON = $002b; { %SYSTEMDRIVE%\Program Files\Common } - CSIDL_COMMON_DOCUMENTS = $002e; { %PROFILEPATH%\All Users\Documents } + CSIDL_PERSONAL = $0005; { %USERPROFILE%\My Documents } + CSIDL_APPDATA = $001A; { %USERPROFILE%\Application Data (roaming) } + CSIDL_LOCAL_APPDATA = $001C; { %USERPROFILE%\Local Settings\Application Data (non roaming) } + CSIDL_INTERNET_CACHE = $0020; { %USERPROFILE%\Local Settings\Temporary Internet Files } + CSIDL_COOKIES = $0021; { %USERPROFILE%\Cookies } + CSIDL_HISTORY = $0022; { %USERPROFILE%\Local settings\History } + CSIDL_COMMON_APPDATA = $0023; { %PROFILESPATH%\All Users\Application Data } + CSIDL_WINDOWS = $0024; { %SYSTEMROOT% } + CSIDL_SYSTEM = $0025; { %SYSTEMROOT%\SYSTEM32 (may be system on 95/98/ME) } + CSIDL_PROGRAM_FILES = $0026; { %SYSTEMDRIVE%\Program Files } + CSIDL_MYPICTURES = $0027; { %USERPROFILE%\My Documents\My Pictures } + CSIDL_PROGRAM_FILES_COMMON = $002b; { %SYSTEMDRIVE%\Program Files\Common } + CSIDL_COMMON_DOCUMENTS = $002e; { %PROFILEPATH%\All Users\Documents } CSIDL_COMMON_ADMINTOOLS = $002f; { %PROFILEPATH%\All Users\Start Menu\Programs\Administrative Tools } - CSIDL_ADMINTOOLS = $0030; { %USERPROFILEPATH%\\Start Menu\Programs\Administrative Tools } + CSIDL_ADMINTOOLS = $0030; { %USERPROFILE%\Start Menu\Programs\Administrative Tools } - CSIDL_FLAG_CREATE = $8000; { (force creation of requested folder if it doesn't exist yet) } + CSIDL_FLAG_CREATE = $8000; { (force creation of requested folder if it doesn't exist yet) } { Original entry points } @@ -74,3 +90,9 @@ const SHFolderDll = 'SHFolder.dll'; end. +{ + $Log$ + Revision 1.2 2004-01-31 23:34:37 michael + + Added header/log footer + +} \ No newline at end of file