Changeset 119 for Include/api_system.sbp

Timestamp:

Feb 23, 2007, 11:00:24 PM (18 years ago)

Author:

イグトランス (egtra)

Message:

Unicode (#50) 前準備
Byte→Char (#51) 型名は殆ど完了、ただし中身までは手を付けていないものが多い

File:

• Include/api_system.sbp (modified) (1 diff)

Include/api_system.sbp

@@ -779 +779 @@
 Declare Function lstrcmpi Lib "kernel32" Alias "lstrcmpiA" (lpString1 As BytePtr, lpString2 As BytePtr) As Long
 Declare Function lstrcpy Lib "kernel32" Alias "lstrcpyA" (lpString1 As BytePtr, lpString2 As BytePtr) As BytePtr
-Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (lpString As BytePtr) As Long
+Declare Function lstrlenA Lib "kernel32" (lpString As LPSTR) As Long
+Declare Function lstrlenW Lib "kernel32" (lpString As LPWSTR) As Long
+#ifdef UNICODE
+Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (lpString As *Char) As Long
+#else
+Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (lpString As *Char) As Long
+#endif
 Declare Sub memcpy Lib "kernel32" Alias "RtlMoveMemory" (pDest As VoidPtr, pSrc As VoidPtr, length As SIZE_T)
 Declare Function MoveFile Lib "kernel32" Alias "MoveFileA" (lpExistingFileName As BytePtr, lpNewFileName As BytePtr) As BOOL