_dButton.au3

;
;===============================================================================
;
; 函数名称:    _dButton($Gui_id, $btn_ctrlid, $z_img, $j_img, $a_img)
; 描    述:    创建动态按钮
; 参    数:     $Gui_id     : 窗口句柄
;    $btn_ctrlid  - (必须): 按钮句柄
;    $z_img    - (可选): 按钮正常时的图片
;    $j_img   - (可选): 鼠标经过按钮时的图片
;    $a_img   - (可选): 鼠标左键点击时的图片
;
;===============================================================================
;

Func _dButton($Gui_id, $btn_ctrlid, $z_img, $j_img, $a_img)
 If WinActive($Gui_id) Then
  $mouse = GUIGetCursorInfo($Gui_id)
  If $mouse[4] = $btn_ctrlid Then
   If $mouse[2] = 1 Then
    GUICtrlSetImage($btn_ctrlid, $a_img)
   Else
    GUICtrlSetImage($btn_ctrlid, $j_img)
   EndIf
  Else
   GUICtrlSetImage($btn_ctrlid, $z_img)
  EndIf
 EndIf
EndFunc   ;==>_dButton

;
;===============================================================================
;
; 函数名称:    _Mousetop($Gui_id,$ctrl_id)
; 描    述:    检测鼠标是否处于指定控件上方
; 参    数:     $Gui_id     : 窗口句柄
;    $ctrl_id    : 按钮句柄
; 要    求:   AutoIt3 V3.3.0.0 汉化版 测试OK
;
; 返 回 值:     1 表示鼠标位于指定窗口的控件上。
;             0 表示鼠标没有在指定窗口的控件上。
;
;
;===============================================================================
;
Func _Mouse_top($Gui_id, $ctrl_id)
  GUICtrlSetState ( $ctrl_id, $GUI_FOCUS )
 If WinActive($Gui_id) Then
  $mouse = GUIGetCursorInfo($Gui_id)
  If @error Then Return 0
  If  $mouse<>0 Then
    If $mouse[4] = $ctrl_id  Then
     Return 1
    Else
     Return 0
    EndIf
  EndIf
 EndIf
EndFunc   ;==>_Mouse_top