lhylm 发表于 2011-1-18 15:37:50

请教高人：如何实现鼠标移到图片按钮上时，显示另一张图片效果？

最近在优化改进光盘自动运行界面，实现自定义功能，方便交互操作！在设置图片按钮效果时遇到了难题，测试了很久还是没有成功！原本想把不好看的按钮换成图片按钮并加上鼠标悬浮效果。具体就是：当鼠标放在图片按钮上时，显示准备好的另一张图片，单击运行程序！当鼠标不在按钮上时恢复原状！希望在此高人指点一下！！谢谢！{:face (229):}

the886 发表于 2011-1-27 15:03:01

控件事件，不懂行不行~！

yhxhappy 发表于 2011-1-27 15:34:54

GUICtrlSetImage
--------------------------------------------------------------------------------

设置控件的位图或图标.

yhxhappy 发表于 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 = $Button And $B = 0 Then
                        GUICtrlSetImage($Button, "shell32.dll", 23)
                        $B = 1
                ElseIf $Pos <> $Button And $B = 1 Then
                        GUICtrlSetImage($Button, "shell32.dll", 22)
                        $B = 0
                EndIf
    WEnd
EndFunc   ;==>Example
页: [1]
查看完整版本: 请教高人：如何实现鼠标移到图片按钮上时，显示另一张图片效果？