Changeset 137 for Include/api_window.sbp

Timestamp:

Mar 7, 2007, 5:36:31 PM (17 years ago)

Author:

イグトランス (egtra)

Message:

#55と#73と#75とりあえず完了

File:

• Include/api_window.sbp (modified) (5 diffs)

Include/api_window.sbp

@@ -5 +5 @@
 #define _INC_WINDOW
 
+#ifdef UNICODE
+Const _FuncName_CreateWindowEx = "CreateWindowExW"
+Const _FuncName_RegisterClassEx = "RegisterClassExW"
+#else
+Const _FuncName_CreateWindowEx = "CreateWindowExA"
+Const _FuncName_RegisterClassEx = "RegisterClassExA"
+#endif
 
 Const CREATEPROCESS_MANIFEST_RESOURCE_ID = 1
@@ -34 +41 @@
 Const CS_BYTEALIGNWINDOW = &H2000
 Const CS_GLOBALCLASS =     &H4000
-Type WNDCLASSEX
+Type WNDCLASSEXA
     cbSize        As DWord
     style         As DWord
@@ -44 +51 @@
     hCursor       As HCURSOR
     hbrBackground As HBRUSH
-    lpszMenuName  As BytePtr
-    lpszClassName As BytePtr
+    lpszMenuName  As LPCSTR
+    lpszClassName As LPCSTR
     hIconSm       As HICON
 End Type
-
+Type WNDCLASSEXW
+    cbSize        As DWord
+    style         As DWord
+    lpfnWndProc   As WNDPROC
+    cbClsExtra    As Long
+    cbWndExtra    As Long
+    hInstance     As HINSTANCE
+    hIcon         As HICON
+    hCursor       As HCURSOR
+    hbrBackground As HBRUSH
+    lpszMenuName  As LPCWSTR
+    lpszClassName As LPCWSTR
+    hIconSm       As HICON
+End Type
+#ifdef UNICODE
+TypeDef WNDCLASSEX = WNDCLASSEXW
+#else
+TypeDef WNDCLASSEX = WNDCLASSEXA
+#endif
 
 '------------------------
@@ -311 +336 @@
 
 Const CW_USEDEFAULT = &H80000000
-Declare Function CreateWindowEx Lib "user32" Alias "CreateWindowExA" (dwExStyle As DWord, lpClassName As PCSTR, lpWindowName As PCSTR, dwStyle As DWord, x As Long, y As Long, nWidth As Long, nHeight As Long, hWndParent As HWND, hMenu As HMENU, hInstance As HINSTANCE, lpParm As VoidPtr) As HWND
+Declare Function CreateWindowEx Lib "user32" Alias _FuncName_CreateWindowEx (dwExStyle As DWord, pClassName As PCTSTR, lpWindowName As PCTSTR, dwStyle As DWord, x As Long, y As Long, nWidth As Long, nHeight As Long, hwndParent As HWND, hmenu As HMENU, hInstance As HINSTANCE, pParm As VoidPtr) As HWND
 
 Declare Function DefWindowProc Lib "user32" Alias "DefWindowProcA" (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
@@ -862 +887 @@
 Declare Function RedrawWindow Lib "user32" (hWnd As HWND, ByRef lprcUpdate As RECT, hrgnUpdate As HRGN, flags As DWord) As BOOL
 
-Declare Function RegisterClassEx Lib "user32" Alias "RegisterClassExA" (ByRef wcx As WNDCLASSEX) As ATOM
+Declare Function RegisterClassEx Lib "user32" Alias _FuncName_RegisterClassEx (ByRef wcx As WNDCLASSEX) As ATOM
 Declare Function RegisterClipboardFormat Lib "user32" Alias "RegisterClipboardFormatA" (lpszFormat As PCSTR) As DWord
 Declare Function RegisterWindowMessage Lib "user32" Alias "RegisterWindowMessageA" (lpString As PCSTR) As DWord