易语言在标题上画按钮源码

在标题上画按钮

系统结构:新窗口程序,画按钮1,画按钮2,位置,SetWindowLong,CallWindowProc,DrawFrameControl,GetWindowDC,

======窗口程序集1
| |
| |------ __启动窗口_创建完毕
| |
| |------ 新窗口程序
| |
| |------ 画按钮1
| |
| |------ 画按钮2
| |
| |------ 位置
| |
| |------ __启动窗口_将被销毁
| |
| |
======调用的Dll
| |
| |---[dll]------ SetWindowLong
| |
| |---[dll]------ CallWindowProc
| |
| |---[dll]------ DrawFrameControl
| |
| |---[dll]------ GetWindowDC

调用的DLL命令:

.DLL命令 SetWindowLong, 子程序指针, , "SetWindowLongA"
.参数 hWnd, 整数型
.参数 nlndex, 整数型
.参数 dwNewLong, 子程序指针

.DLL命令 CallWindowProc, 子程序指针, , "CallWindowProcA"
.参数 lpPrevWndFunc, 子程序指针
.参数 hWnd, 整数型
.参数 Msg, 整数型
.参数 wParam, 整数型
.参数 IParam, 整数型

.DLL命令 DrawFrameControl, 整数型, , "DrawFrameControl"
.参数 hDC, 整数型
.参数 lpRect, rect
.参数 un1, 整数型
.参数 un2, 整数型

.DLL命令 GetWindowDC, 整数型, , "GetWindowDC"
.参数 hwnd, 整数型