xwt620 发表于 2009-12-3 22:40:23

怎样实现点击GUICtrlCreateInput时，自动将内容设置为空

本帖最后由 xwt620 于 2009-12-3 23:07 编辑

RT，如何修改下面的代码？Opt("GUIOnEventMode", 1)
$Form1_1 = GUICreate("form1", 292, 150, @DesktopWidth / 3, @DesktopHeight / 3)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

$Input1 = GUICtrlCreateInput("请输入内容", 72, 40, 153, 21)
GUICtrlSetOnEvent(-1, "on_event")
GUISetState(@SW_SHOW)

While 1
        Sleep(1000)
WEnd

Func on_event()
        Switch @GUI_CtrlId
                Case $Input1
                        GUICtrlSetData($Input1, "" , "")
        EndSwitch
EndFunc   ;==>on_event

Func _Exit()
        $iAnswer = MsgBox(4 + 256 + 32, "确认", "退出吗？")
        Select
                Case $iAnswer = 6 ;OK
                        Exit 0
                Case $iAnswer = 7 ;Cancel
        EndSelect
EndFunc   ;==>_Exit

pusofalse 发表于 2009-12-3 22:54:49

搜索。http://www.autoitx.com/search.php?searchid=359&orderby=lastpost&ascdesc=desc&searchsubmit=yes

xwt620 发表于 2009-12-3 23:07:26

谢谢~
顺便问下有没有鼠标停留在按钮上，则自动显示tooltip的函数
看帮助文件好像没有这种事件

131738 发表于 2009-12-4 00:09:39

本帖最后由 131738 于 2009-12-4 00:12 编辑

回复 3# xwt620

这个没有直接的函数，要自己写脚本的，看 UDF 的气泡提示控件(GuiToolTip)

50186610 发表于 2013-7-31 11:08:24

http://www.autoitx.com/forum.php?mod=viewthread&tid=467

winple 发表于 2014-6-17 08:02:13

感谢楼主指教啊，终于会使用了
页: [1]
查看完整版本: 怎样实现点击GUICtrlCreateInput时，自动将内容设置为空