分配工具提示控件到滑块控件.
(译注:当拖动滑块指针时,工具提示控件提示当前刻度位置值)
#Include <GuiSlider.au3>
_GUICtrlSlider_SetToolTips($hWnd, $hWndTT)
$hWnd | 控件句柄 |
$hWndTT | 现有工具提示控件句柄 |
#include <GUIConstantsEx.au3>
#include <GuiSlider.au3>
$Debug_S = False ; 检查传递给函数的类名, 设置为真并使用另一控件的句柄可以看出它是否有效
_Main()
Func _Main()
Local $hWndTT, $hSlider
; 创建 GUI
GUICreate("Slider Set Tool Tips", 400, 296)
$hSlider = GUICtrlCreateSlider(2, 2, 396, 20, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS, $TBS_ENABLESELRANGE))
GUISetState()
; 获取工具提示
$hWndTT = _GUICtrlSlider_GetToolTips($hSlider)
MsgBox(4160, "信息", "Tool Tip Handle: " & $hWndTT)
; 设置工具提示
_GUICtrlSlider_SetToolTips($hSlider, $hWndTT)
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main