[已解决]能否实现点击TRAYTIP里的文字，这个文字类似按钮一样，点击后执行一段函数

xwt620 · 发表于 2011-7-23 00:17:17

本帖最后由 xwt620 于 2011-8-3 23:51 编辑

RT，该功能类似QQ掉线后，点击TRAYTIP中的立即登录取消则执行一段函数
完整图片

xwt620 · 发表于 2011-7-23 17:48:22

看的人多，没有回帖的

powerofos · 发表于 2011-7-24 19:25:29

我是没看懂你的意思，不过要实现QQ这个掉线重连界面不是很简单吗？

xwt620 · 发表于 2011-7-24 22:06:19

回复 3# powerofos

界面是很简单，但是怎样才能是实现点击立即登录则执行一段函数呢？

powerofos · 发表于 2011-7-25 00:36:23

我都开始怀疑自己的理解能力了。

#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <Constants.au3>
;~ #Include <WinAPIEx.au3>


Opt("GUIOnEventMode",1)
Opt("TrayMenuMode",1)
Opt("TrayOnEventMode",1)


Global $MsgBoard,$Exit,$Login,$Cancel,$WCode = 1,$TrayMouseHover = 0

TraySetOnEvent($TRAY_EVENT_MOUSEOVER,"TrayMouseHover")
TrayTip("鼠标悬停到图标上","鼠标悬停到图标上",15,1)


While $WCode        
        Sleep(50)
WEnd


Func TrayMouseHover()
        If Not $TrayMouseHover Then
                $TrayMouseHover = 1
                MsgBoard()
        EndIf                
EndFunc        

Func LoginFunc()
        MsgBox(0,"","重新登录执行函数")
EndFunc

Func CancelFunc()
        MsgBox(0,"","取消执行函数")
EndFunc

Func MsgBoard()
;~         Local $tRECT = _WinAPI_GetWorkArea()
;~         Local $LowerR_X = DllStructGetData($tRECT,'Right')
;~         Local $LowerR_Y = DllStructGetData($tRECT,'Bottom')
;~         $MsgBoard = GUICreate("",200,100,$LowerR_X-300,$LowerR_Y-100,$WS_POPUP+$WS_BORDER,$WS_EX_TOPMOST)
        
        $MsgBoard = GUICreate("",200,100,@DesktopWidth-300,@DesktopHeight-150,$WS_POPUP+$WS_BORDER,$WS_EX_TOOLWINDOW+$WS_EX_TOPMOST)
        GUISetBkColor(0xfef9d6)        
        $Exit = GUICtrlCreateIcon("shell32.dll",-132,180,6,16,16,BitOR($SS_NOTIFY,$WS_GROUP,$WS_TABSTOP))
        GUICtrlSetCursor(-1,0)
        GUICtrlSetTip(-1,"Exit")
        GUICtrlSetOnEvent(-1,"GUIFunction")        
        $Login = GUICtrlCreateLabel("重新登录",100,80,50,18)        
        GUICtrlSetCursor(-1,0)
        GUICtrlSetColor(-1,0x0000c6)
        GUICtrlSetTip(-1,"重新登录")
        GUICtrlSetOnEvent(-1,"GUIFunction")        
        $Cancel = GUICtrlCreateLabel("取消",165,80,30,18)
        GUICtrlSetCursor(-1,0)
        GUICtrlSetColor(-1,0x0000c6)
        GUICtrlSetTip(-1,"取消")
        GUICtrlSetOnEvent(-1,"GUIFunction")        
        GUISetState()
EndFunc

Func GUIFunction()
        Switch @GUI_CtrlId
                Case $Exit
                        $WCode = 0                        
                Case $Login
                        LoginFunc()                        
                Case $Cancel
                        CancelFunc()                        
        EndSwitch
EndFunc

xwt620 · 发表于 2011-7-26 21:17:17

回复 5# powerofos

用了下感觉良好，但是TRAYTIP的GUI是带个小角的，如果能做成那种样式就很好了

powerofos · 发表于 2011-7-26 21:51:08

估计QQ它的看起来就像traytip，倘若AU3中实现了这个功能个，估计能称得上：TraytipEx ？

官网有个弹出消息窗口例子：

浪迹红客 · 发表于 2011-7-27 19:02:51

学习了。。。

freedom · 发表于 2011-7-28 11:53:25

收藏，备用。

楼上风云 · 发表于 2011-7-28 19:29:57

谁说这一定是个TRAYTIP？是否也可以理解为无边框GUI，其中的叉叉也可以理解为按钮控件啊。如果这样理解的话，GUI样式和扩展样式就OK了。

pdp320921 · 发表于 2011-7-29 16:20:23

回复 11# 楼上风云

同意楼上说法！

xwt620 · 发表于 2011-7-29 20:54:17

回复 11# 楼上风云

我的截图是只截了上面的一部分，完整的应该是下面这个

yjw83523 · 发表于 2011-7-30 15:57:58

大力收藏

szp123 · 发表于 2012-4-16 14:37:41

好东西，做个记号。。

ak47gglllk · 发表于 2014-11-13 11:29:17

学习了，感谢感谢。非常感谢

		自动登录	找回密码
密码			加入

[AU3基础] [已解决]能否实现点击TRAYTIP里的文字，这个文字类似按钮一样，点击后执行一段函数

本帖子中包含更多资源

评分

相关帖子

评分

本帖子中包含更多资源

评分

本帖子中包含更多资源