易语言移动菜单源码 [db:版本]

移动菜单

系统结构:移动菜单,ReleaseCapture,写配置,读配置,SendMessage,

======窗口程序集1
| |
| |------ _外形框1_鼠标左键被按下
| |
| |------ 移动菜单
| |
| |------ _图形按钮5_被单击
| |
| |------ _图形按钮4_被单击
| |
| |------ _图形按钮1_被单击
| |
| |------ _图形按钮2_被单击
| |
| |------ _图形按钮3_被单击
| |
| |------ _外形框3_鼠标左键被按下
| |
| |------ _图形按钮7_被单击
| |
| |------ _图形按钮11_被单击
| |
| |------ __启动窗口_创建完毕
| |
| |------ __启动窗口_鼠标右键被按下
| |
| |------ _标准工具条_被选择
| |
| |------ __启动窗口_尺寸被改变
| |
| |------ _图形按钮9_被单击
| |
| |------ __启动窗口_将被销毁
| |
| |------ _标签3_鼠标右键被按下
| |
| |
======调用的Dll
| |
| |---[dll]------ ReleaseCapture
| |
| |---[dll]------ 写配置
| |
| |---[dll]------ 读配置
| |
| |---[dll]------ SendMessage

调用的DLL命令:

.DLL命令 ReleaseCapture, 整数型, , "ReleaseCapture"

.DLL命令 写配置, 整数型, , "WritePrivateProfileStringA", , 如果配置文件不存在则将被创建
.参数 小节名, 文本型, , 就是用中括号括起来的内容
.参数 项目名, 文本型, , 就是等号前边的内容
.参数 项目值, 文本型, , 就是等号后面的内容
.参数 文件名, 文本型, , 就是你要写入的那个文件

.DLL命令 读配置, 整数型, , "GetPrivateProfileIntA"
.参数 小节名, 文本型, , 就是用中括号括起来的内容
.参数 项目名, 文本型, , 就是等号前边的内容
.参数 默认值, 整数型, , 如果找不到对应的项目则返回该值
.参数 文件名, 文本型, , 就是你要读的那个文件

.DLL命令 SendMessage, 整数型, , "SendMessageA"
.参数 hwnd, 整数型
.参数 wMsg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型