|
发表于 2021-7-5 12:06:57
|
显示全部楼层
功能 主窗口_消息路由(句柄,消息,w参数,l参数,时间,x坐标,y坐标)
变量 表格句柄=控件获取句柄("表格_属性点数据")
如果(句柄==表格句柄 && 消息==515)//左键双击
变量 选中项=右键菜单弹出("取消|启动|停止")
调试输出(选中项)
选择(选中项)
条件 0
//选中取消项
条件 1
//选中启动项
条件 2
//选中停止项
结束
结束
结束
功能 右键菜单弹出(选项内容)
变量 总选项数组
变量 TPM_RETURNCMD =#0100
变量 TPM_RIGHTBUTTON =#0002
变量 TPM_LEFTBUTTON =#0000
变量 TPM_RIGHTALIGN =#0008
变量 TPM_TOPALIGN =#0000
变量 选项数量 = 字符串分割(选项内容,"|",总选项数组)//分割传过来的选项内容
变量 菜单句柄=动态库调用("user32.dll","int","CreatePopupMenu") //创建弹出式菜单
如果(菜单句柄==0)
返回 0 //菜单创建失败就直接返回0
结束
遍历(变量 i=0;i<选项数量;i++)
//下面是增加菜单的item(理解成选项吧)
动态库调用("user32.dll","int","AppendMenuA","int",菜单句柄,"int",0,"int",i,"char *",总选项数组[i])
结束
变量 x,y
鼠标获取坐标(x,y)
//弹出生成好的菜单,并返回你点击的选项,返回选项id.从上往下从1开始递增
变量 ret=动态库调用("user32.dll","int","TrackPopupMenu","int",菜单句柄,"int",TPM_RIGHTALIGN+TPM_TOPALIGN+TPM_LEFTBUTTON+TPM_RIGHTBUTTON + TPM_RETURNCMD,"int",x,"int",y,"int",0,"int",窗口获取自我句柄(),"int",0)
//销毁菜单(菜单点击完成后都是要关闭的)
动态库调用("user32.dll","int","DestroyMenu","int",菜单句柄)
返回 ret
结束 |
|