Changeset 390

Timestamp:

Dec 6, 2007, 11:47:23 PM (17 years ago)

Author:

イグトランス (egtra)

Message:

アトム関係の関数・定数宣言の追加

File:

• trunk/Include/api_system.sbp (modified) (8 diffs)

trunk/Include/api_system.sbp

@@ -5 +5 @@
 
 #ifdef UNICODE
+Const _FuncName_AddAtom = "AddAtomW"
 Const _FuncName_CompareString = "CompareStringW"
 Const _FuncName_CopyFile = "CopyFileW"
@@ -20 +21 @@
 Const _FuncName_ExpandEnvironmentStrings = "ExpandEnvironmentStringsW"
 Const _FuncName_FatalAppExit = "FatalAppExitW"
+Const _FuncName_FindAtom = "FindAtomW"
 Const _FuncName_FindFirstChangeNotification = "FindFirstChangeNotificationW"
 Const _FuncName_FindFirstFile = "FindFirstFileW"
@@ -38 +40 @@
 Const _FuncName_GetFileAttributes = "GetFileAttributesW"
 Const _FuncName_GetFullPathName = "GetFullPathNameW"
+Const _FuncName_GetAtomName = "GetAtomNameW"
+Const _FuncName_GlobalAddAtom = "GlobalAddAtomW"
+Const _FuncName_GlobalFindAtom = "GlobalFindAtomW"
+Const _FuncName_GlobalGetAtomName = "GlobalGetAtomNameW"
 Const _FuncName_GetLogicalDriveStrings = "GetLogicalDriveStringsW"
 Const _FuncName_GetLongPathName = "GetLongPathNameW"
@@ -72 +78 @@
 Const _FuncName_SetFileAttributes = "SetFileAttributesW"
 #else
+Const _FuncName_AddAtom = "AddAtomA"
 Const _FuncName_CompareString = "CompareStringA"
 Const _FuncName_CopyFile = "CopyFileA"
@@ -87 +94 @@
 Const _FuncName_ExpandEnvironmentStrings = "ExpandEnvironmentStringsA"
 Const _FuncName_FatalAppExit = "FatalAppExitA"
+Const _FuncName_FindAtom = "FindAtomA"
 Const _FuncName_FindFirstChangeNotification = "FindFirstChangeNotificationA"
 Const _FuncName_FindFirstFile = "FindFirstFileA"
@@ -93 +101 @@
 Const _FuncName_FormatMessage = "FormatMessageA"
 Const _FuncName_FreeEnvironmentStrings = "FreeEnvironmentStringsA"
+Const _FuncName_GetAtomName = "GetAtomNameA"
+Const _FuncName_GlobalAddAtom = "GlobalAddAtomA"
+Const _FuncName_GlobalFindAtom = "GlobalFindAtomA"
+Const _FuncName_GlobalGetAtomName = "GlobalGetAtomNameA"
 Const _FuncName_GetCompressedFileSize = "GetCompressedFileSizeA"
 Const _FuncName_GetComputerName = "GetComputerNameA"
@@ -144 +156 @@
 ' default constants
 Const INVALID_HANDLE_VALUE = -1 As HANDLE
-Const INVALID_SET_FILE_POINTER = &HFFFFFFFF
+Const INVALID_FILE_SIZE = &HFFFFFFFF As DWord
+Const INVALID_SET_FILE_POINTER = &HFFFFFFFF As DWord
+Const INVALID_FILE_ATTRIBUTES = &HFFFFFFFF As DWord
 
 '-----------------
@@ -940 +954 @@
     ByRef PreviousState As TOKEN_PRIVILEGES, ByRef ReturnLength As Long) As Long
 
+Declare Function AddAtom Lib "kernel32" Alias _FuncName_AddAtom (lpString As LPCTSTR) As ATOM
+Declare Function DeleteAtom Lib "kernel32" (nAtom As ATOM) As ATOM
+Declare Function FindAtom Lib "kernel32" Alias _FuncName_AddAtom (lpString As LPCTSTR) As ATOM
+Declare Function GetAtomName Lib "kernel32" Alias _FuncName_GetAtomName (nAtom As ATOM, lpBuffer As LPCTSTR, nSize As Long) As DWord
+
+Declare Function GlobalAddAtom Lib "kernel32" Alias _FuncName_GlobalAddAtom (lpString As LPCTSTR) As ATOM
+Declare Function GlobalDeleteAtom Lib "kernel32" (a As ATOM) As ATOM
+Declare Function GlobalFindAtom Lib "kernel32" Alias _FuncName_GlobalAddAtom (lpString As LPCTSTR) As ATOM
+Declare Function GlobalGetAtomName Lib "kernel32" Alias _FuncName_GlobalGetAtomName (nAtom As ATOM, lpBuffer As LPCTSTR, nSize As Long) As DWord
+
+Declare Function InitAtomTable Lib "kernel32" (nSize As DWord) As BOOL
+
+Const MAXINTATOM = &hC000
+Const MAKEINTATOM(i) = (i As Word As ULONG_PTR As LPTSTR)
+Const INVALID_ATOM = 0 As ATOM
+
 #endif '_INC_SYSTEM