易语言使用sdk方式创建窗口源码

使用sdk方式创建窗口

系统结构:窗口主程序,窗口回调函数,GetModuleHandle,GetCommandLine,LoadIcon,LoadCursor,RegisterClassEx,CreateWindowEx,ShowWindow,UpdateWindow,GetMessage,TranslateMessage,DispatchMessage,PostQuitMessage,DefWindowProc,ExitProcess,

======程序集1
| |
| |------ _启动子程序
| |
| |------ 窗口主程序
| |
| |------ 窗口回调函数
| |
| |
======调用的Dll
| |
| |---[dll]------ GetModuleHandle
| |
| |---[dll]------ GetCommandLine
| |
| |---[dll]------ LoadIcon
| |
| |---[dll]------ LoadCursor
| |
| |---[dll]------ RegisterClassEx
| |
| |---[dll]------ CreateWindowEx
| |
| |---[dll]------ ShowWindow
| |
| |---[dll]------ UpdateWindow
| |
| |---[dll]------ GetMessage
| |
| |---[dll]------ TranslateMessage
| |
| |---[dll]------ DispatchMessage
| |
| |---[dll]------ PostQuitMessage
| |
| |---[dll]------ DefWindowProc
| |
| |---[dll]------ ExitProcess

调用的DLL命令:

.DLL命令 GetModuleHandle, 整数型, "kernel32.dll", "GetModuleHandleA", , 获得模块句柄
.参数 lpModuleName, 文本型

.DLL命令 GetCommandLine, 文本型, "kernel32.dll", "GetCommandLineA", , 获得命令行

.DLL命令 LoadIcon, 整数型, , "LoadIconA", , 从指定的模块或应用程序实例中载入一个图标指针。
.参数 hInstance, 整数型, , 指定包含了图标的可执行程序
.参数 lpcstr, 整数型, , 作为一个字串，指定欲载入的指针资源。作为一个长整数值，指定欲载入的资源ID；或者设置一个常数，代表某幅固有系统指针。如装载的是一个固有系统指针，注意hInstance参数应设为零。在api32.txt文件中以前缀IDC_ 作为标志;

.DLL命令 LoadCursor, 整数型, , "LoadCursorA", , 从指定的模块或应用程序实例中载入一个光标指针
.参数 hInstance, 整数型
.参数 lpCursorName, 整数型

.DLL命令 RegisterClassEx, 短整数型, , "RegisterClassExA"
.参数 pwcx, WNDCLASSEX

.DLL命令 CreateWindowEx, 整数型, , "CreateWindowExA"
.参数 dwExStyle, 整数型
.参数 lpClassName, 文本型
.参数 lpWindowName, 文本型
.参数 dwStyle, 整数型
.参数 x, 整数型
.参数 y, 整数型
.参数 nWidth, 整数型
.参数 nHeight, 整数型
.参数 hWndParent, 整数型
.参数 hMenu, 整数型
.参数 hInstance, 整数型
.参数 lpParam, 整数型

.DLL命令 ShowWindow, , , "ShowWindow"
.参数 hWnd, 整数型
.参数 nCmdShow, 整数型

.DLL命令 UpdateWindow, 整数型, , "UpdateWindow"
.参数 hWnd, 整数型

.DLL命令 GetMessage, 整数型, , "GetMessageA"
.参数 lpMsg, MSG
.参数 HWND, 整数型
.参数 wMsgFilterMin, 整数型
.参数 wMsgFilterMax, 整数型

.DLL命令 TranslateMessage, 整数型, , "TranslateMessage"
.参数 lpMsg, MSG

.DLL命令 DispatchMessage, 整数型, , "DispatchMessageA"
.参数 lpmsg, MSG

.DLL命令 PostQuitMessage, 整数型, , "PostQuitMessage"
.参数 nExitCode, 整数型

.DLL命令 DefWindowProc, 整数型, , "DefWindowProcA"
.参数 hWnd, 整数型
.参数 uMsg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型

.DLL命令 ExitProcess, 整数型, , "ExitProcess"
.参数 退出代码, 整数型