TC官方合作论坛

标题: 求救!鼠标右键点击托盘的相关消息路由或者消息过程 [打印本页]

作者: yhmjh    时间: 2015-7-17 15:19
标题: 求救!鼠标右键点击托盘的相关消息路由或者消息过程
求救!鼠标右键点击托盘的相关消息路由或者消息过程该怎么写?就是鼠标移动到托盘,鼠标点击右键,然后触发一个事件,这个怎么写?求大神看看

作者: cjxdn    时间: 2015-7-17 15:26
http://bbs.tyuyan.com/thread-50685-1-1.html
作者: yhmjh    时间: 2015-7-17 15:31
cjxdn 发表于 2015-7-17 15:26
http://bbs.tyuyan.com/thread-50685-1-1.html

就是用了里面的也不行
作者: yhmjh    时间: 2015-7-17 15:39
function 创建拖盘(tip)
    var hIcon =  GetIconHandle(windowgetmyhwnd())//我们是第一次创建拖盘,所以需要图标
    var NOTIFYICONDATA = CreateNOTIFYICONDATA(NIF_ICON + NIF_TIP,tip,"","",hIcon)   //重构结构体内容
    dllcall("shell32.dll","long","Shell_NotifyIconW","long",NIM_ADD,"pstruct",NOTIFYICONDATA)//创建托盘
end

这个消息创建的托盘收不到鼠标的消息,就是消息过程收不到,没有反应,求解?

//消息过程功能
功能 气泡提示_消息过程(消息,w参数,l参数)
    如果(消息 == #632)
        如果(w参数 == #80 && l参数 == #205)    //右键单击托盘图标
            
            PopuMenu(窗口获取自我句柄(),托盘菜单信息[0][0],托盘菜单信息,200,真)
            //不通过消息路由的方式
            //返回值=PopuMenu(窗口获取自我句柄(),托盘菜单信息[0][0],托盘菜单信息,200,false)
            //菜单测试.菜单处理(返回值,托盘菜单信息)
            返回 真        //这里必须给予返回,否则仍会在显示完自己的菜单后显示原TC托盘右键菜单
        结束
    结束
结束




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1