找回密码
 加入
搜索
查看: 3691|回复: 3

[GUI管理] 请教高人:如何实现鼠标移到图片按钮上时,显示另一张图片效果?

[复制链接]
发表于 2011-1-18 15:37:50 | 显示全部楼层 |阅读模式
最近在优化改进光盘自动运行界面,实现自定义功能,方便交互操作!在设置图片按钮效果时遇到了难题,测试了很久还是没有成功!原本想把不好看的按钮换成图片按钮并加上鼠标悬浮效果。具体就是:当鼠标放在图片按钮上时,显示准备好的另一张图片,单击运行程序!当鼠标不在按钮上时恢复原状!希望在此高人指点一下!!谢谢!
发表于 2011-1-27 15:03:01 | 显示全部楼层
控件事件,不懂行不行~!
发表于 2011-1-27 15:34:54 | 显示全部楼层
GUICtrlSetImage
--------------------------------------------------------------------------------

设置控件的位图或图标.
发表于 2011-1-27 17:15:06 | 显示全部楼层
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>


Example()

Func Example()
    Local $msg, $B = 0
    
    $GUI = GUICreate("函数演示")  ; 创建居中显示的对话框窗口

    $Button = GUICtrlCreateButton("图像按钮", 100, 100, 80, 80, $BS_ICON)
    GUICtrlSetImage(-1, "shell32.dll", 22)    
        
    GUISetState()

    ; 运行 GUI,直到对话框窗口关闭
    While 1
        $msg = GUIGetMsg()        
        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
                $Pos = GUIGetCursorInfo($GUI)
                If $Pos[4] = $Button And $B = 0 Then
                        GUICtrlSetImage($Button, "shell32.dll", 23)
                        $B = 1
                ElseIf $Pos[4] <> $Button And $B = 1 Then
                        GUICtrlSetImage($Button, "shell32.dll", 22)
                        $B = 0
                EndIf
    WEnd
EndFunc   ;==>Example
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-21 06:06 , Processed in 0.080378 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表