Changeset 258 for Include/api_shell.sbp

Timestamp:

May 21, 2007, 1:03:21 AM (17 years ago)

Author:

イグトランス (egtra)

Message:

Prompt.sbp内を名前空間に入れた。EnvironmentのMachineName, UserName, GetFolderPathを実装。

File:

• Include/api_shell.sbp (modified) (2 diffs)

Include/api_shell.sbp

@@ -374 +374 @@
 
 ' ShlObj.h
+
+'要IE4
 Declare Function SHGetSpecialFolderPath Lib "shell32" Alias _FuncName_SHGetSpecialFolderPath (hwndOwner As HWND, lpszPath As LPTSTR, nFolder As Long, fCreate As BOOL) As BOOL
 
@@ -379 +381 @@
 Declare Function SHGetInstanceExplorer Lib "shell32" (ByRef ppunk As *IUnknown) As HRESULT
 
-Const CSIDL_PERSONAL = 5
-Const CSIDL_FAVORITIES = 6
+'shlobj.h
+Declare Function SHGetSpecialFolderLocation Lib "shell32" (hwndOwner As HWND, nFolder As Long, ByRef pidl As LPITEMIDLIST) As HRESULT
+
+'shlobj.h
+'要Win2k/Me
+'Declare Function SHGetFolderLocation Lib "shell32" (hwndOwner As HWND, nFolder As Long, hToken As HANDLE, dwReserved As DWord, ByRef pidl As LPITEMIDLIST) As HRESULT
+
+Const CSIDL_DESKTOP = &h0000
+Const CSIDL_INTERNET = &h0001
+Const CSIDL_PROGRAMS = &h0002
+Const CSIDL_CONTROLS = &h0003
+Const CSIDL_PRINTERS = &h0004
+Const CSIDL_PERSONAL = &h0005
+Const CSIDL_FAVORITES = &h0006
+Const CSIDL_STARTUP = &h0007
+Const CSIDL_RECENT = &h0008
+Const CSIDL_SENDTO = &h0009
+Const CSIDL_BITBUCKET = &h000a
+Const CSIDL_STARTMENU = &h000b
+Const CSIDL_MYMUSIC = &h000d
+Const CSIDL_DESKTOPDIRECTORY = &h0010
+Const CSIDL_DRIVES = &h0011
+Const CSIDL_NETWORK = &h0012
+Const CSIDL_NETHOOD = &h0013
+Const CSIDL_FONTS = &h0014
+Const CSIDL_TEMPLATES = &h0015
+Const CSIDL_COMMON_STARTMENU = &h0016
+Const CSIDL_COMMON_PROGRAMS = &h0017
+Const CSIDL_COMMON_STARTUP = &h0018
+Const CSIDL_COMMON_DESKTOPDIRECTORY = &h0019
+Const CSIDL_APPDATA = &h001a
+Const CSIDL_PRINTHOOD = &h001b
+Const CSIDL_LOCAL_APPDATA = &h001c
+Const CSIDL_ALTSTARTUP = &h001d
+Const CSIDL_COMMON_ALTSTARTUP = &h001e
+Const CSIDL_COMMON_FAVORITES = &h001f
+Const CSIDL_INTERNET_CACHE = &h0020
+Const CSIDL_COOKIES = &h0021
+Const CSIDL_HISTORY = &h0022
+Const CSIDL_COMMON_APPDATA = &h0023
+Const CSIDL_WINDOWS = &h0024
+Const CSIDL_SYSTEM = &h0025
+Const CSIDL_PROGRAM_FILES = &h0026
+Const CSIDL_MYPICTURES = &h0027
+Const CSIDL_PROFILE = &h0028
+Const CSIDL_PROGRAM_FILES_COMMON = &h002b
+Const CSIDL_COMMON_TEMPLATES = &h002d
+Const CSIDL_COMMON_DOCUMENTS = &h002e
+Const CSIDL_COMMON_ADMINTOOLS = &h002f
+Const CSIDL_ADMINTOOLS = &h0030
 
 Const SHGFI_ICON              = &H000000100