Index: trunk/Include/api_system.sbp
===================================================================
--- trunk/Include/api_system.sbp	(revision 389)
+++ trunk/Include/api_system.sbp	(revision 390)
@@ -5,4 +5,5 @@
 
 #ifdef UNICODE
+Const _FuncName_AddAtom = "AddAtomW"
 Const _FuncName_CompareString = "CompareStringW"
 Const _FuncName_CopyFile = "CopyFileW"
@@ -20,4 +21,5 @@
 Const _FuncName_ExpandEnvironmentStrings = "ExpandEnvironmentStringsW"
 Const _FuncName_FatalAppExit = "FatalAppExitW"
+Const _FuncName_FindAtom = "FindAtomW"
 Const _FuncName_FindFirstChangeNotification = "FindFirstChangeNotificationW"
 Const _FuncName_FindFirstFile = "FindFirstFileW"
@@ -38,4 +40,8 @@
 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,4 +78,5 @@
 Const _FuncName_SetFileAttributes = "SetFileAttributesW"
 #else
+Const _FuncName_AddAtom = "AddAtomA"
 Const _FuncName_CompareString = "CompareStringA"
 Const _FuncName_CopyFile = "CopyFileA"
@@ -87,4 +94,5 @@
 Const _FuncName_ExpandEnvironmentStrings = "ExpandEnvironmentStringsA"
 Const _FuncName_FatalAppExit = "FatalAppExitA"
+Const _FuncName_FindAtom = "FindAtomA"
 Const _FuncName_FindFirstChangeNotification = "FindFirstChangeNotificationA"
 Const _FuncName_FindFirstFile = "FindFirstFileA"
@@ -93,4 +101,8 @@
 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,5 +156,7 @@
 ' 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,3 +954,19 @@
 	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