Ticket #1275: GUICtrlSetTip-bug.au3

File GUICtrlSetTip-bug.au3, 419 bytes (added by whim, 15 years ago)
Line 
1
2$main = GUIcreate("Test", 100, 50, -1, -1)
3$button = GUICtrlCreateButton("Hover me", 10, 10, 80, 20)
4$tip = GUICtrlSetTip($button,   "When this button is hovered until" & @CRLF & _
5                                                                "time-out, the tip can not be" & @CRLF & _
6                                                                "re-triggered in AI 3.3.1.3+" & @CRLF & _
7                                                                "in AI 3.3.1.1 it does work")
8GUISetState(@SW_SHOW, $main)
9While 1
10        $msg = GuiGetMsg()
11        If $msg = - 3 Then Exit
12Wend