当鼠标点击相关按钮怎么出现一些说明性信息呢（已解决）

asura · 发表于 2011-12-31 16:54:08

本帖最后由 asura 于 2012-1-4 13:05 编辑

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 462, 294, 267, 212)
$Group1 = GUICtrlCreateGroup("总体大概", 40, 32, 393, 209)
$Radio1 = GUICtrlCreateRadio("Radio1", 88, 96, 73, 33)
$Radio2 = GUICtrlCreateRadio("Radio2", 264, 96, 73, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd

代码如上，如果我点击Radio1 后出现一个就像类似气球似的的提示信息呢？请各位大大，出手相助下，谢谢

80ren · 发表于 2011-12-31 17:15:30

函数参考
ToolTip
--------------------------------------------------------------------------------

在屏幕的任意位置显示一个工具提示.

ToolTip ( "文本" [, X坐标 [, Y坐标 [, "标题" [, 图标 [, 选项]]]]] )

参数

文本工具提示的文本(如果是空字符串则清除现有的工具提示).
X坐标 [可选参数] 工具提示出现位置的 X 坐标.
Y坐标 [可选参数] 工具提示出现位置的 Y 坐标.
标题 [可选参数] 工具提示的标题, 需要 IE5+支持
图标 [可选参数] 需要显示在标题的预定义图标: 需要设置一个标题.
0 = 没有图标, 1 = 信息图标, 2 = 警告图标, 3 = 错误图标
选项 [可选参数] 为不同的显示类型设置不同的显示选项(可以多个值相加):
1 = 显示气泡提示需要 IE5+支持
2 = 在X,Y坐标中,居中显示提示.而不是在左上角显示.
4 = 如果有必要,强制显示工具提示总是可见,如果有多个显示器并且工具提示显示于屏幕边界,那么在另外的显示器上面也会显示.

返回值

成功: 返回 1.
失败: 返回 0 ,当标题长度大于 99.

注意/说明

要跳过可选参数设置,请使用 Default 关键字.

如果X,Y坐标没有设置,提示将显示于鼠标的坐标.
工具提示不能出现于脚本终止或者 ToolTip("") 以后.
你可以使用 @CR 或者 @LF 来创建多行的工具提示.
要显示一个图标, 您必须设置一个非空标题. 要使图标和标题在同一行,则必须使用一个标题.
如果使用居中标志, 工具提示会根据指定的坐标的相对位置进行显示.如果在气泡提示上使用居中标志,将会指向指定坐标点

showshow · 发表于 2011-12-31 19:20:30

回复 2# 80ren

楼上正解！

hzxymkb · 发表于 2011-12-31 22:41:09

回复 1# asura

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 462, 294, 267, 212)
$Group1 = GUICtrlCreateGroup("总体大概", 40, 32, 393, 209)
$Radio1 = GUICtrlCreateRadio("Radio1", 88, 96, 73, 33)
$Radio2 = GUICtrlCreateRadio("Radio2", 264, 96, 73, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Radio1
                        ToolTip("这是一个提示", 1, 1)
                        Sleep(1000)
                        ToolTip("")
        EndSwitch
WEnd

user3000 · 发表于 2011-12-31 22:45:11

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
Local $WinTtle = 'Test Win'
$Form1 = GUICreate($WinTtle, 462, 294, 267, 212)
$Group1 = GUICtrlCreateGroup("总体大概", 40, 32, 393, 209)
$Radio1 = GUICtrlCreateRadio("Radio1", 88, 96, 73, 33)
$Radio2 = GUICtrlCreateRadio("Radio2", 264, 96, 73, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
        If GUIGetMsg() = -3 Then Exit
        Local $mPos = GUIGetCursorInfo(WinGetHandle($WinTtle))
        If Not @error Then
                If $mPos[4] = $Radio1 Then
                        ToolTip('This is Radio1...')
                ElseIf $mPos[4] = $Radio2 Then
                        ToolTip('This is Radio2...')
                Else
                        ToolTip('')
                EndIf
        EndIf
WEnd

hzxymkb · 发表于 2011-12-31 22:51:28

回复 5# user3000

你这个是移动到控件上面出现提示，而楼主是要求点击后出现提示！
我觉得楼主的意思表达错误！

user3000 · 发表于 2011-12-31 23:10:23

回复 user3000

你这个是移动到控件上面出现提示，而楼主是要求点击后出现提示！
我觉得楼主 ...
hzxymkb 发表于 2011-12-31 22:51

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
Opt('guioneventmode', 1)
Local $WinTtle = 'Test Win'
$Form1 = GUICreate($WinTtle, 462, 294, 267, 212)
GUISetOnEvent($GUI_EVENT_CLOSE, '_Exit')
$Group1 = GUICtrlCreateGroup("总体大概", 40, 32, 393, 209)
$Radio1 = GUICtrlCreateRadio("Radio1", 88, 96, 73, 33)
GUICtrlSetOnEvent(-1, '_ClickOn')
$Radio2 = GUICtrlCreateRadio("Radio2", 264, 96, 73, 33)
GUICtrlSetOnEvent(-1, '_ClickOn')
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
        Sleep(100)
WEnd

Func _Exit()
        Exit
EndFunc

Func _ClickOn()
        ToolTip('Click...')
        Sleep(500)
        ToolTip('')
EndFunc

点击的, 不过这样子....实现什么目的呢?

afan · 发表于 2011-12-31 23:49:12

“类似气球似的的提示信息” ToolTip() 需要加选项参数。

星云散落 · 发表于 2012-1-3 10:32:19

Tooltip/Traytip 都能起到类似的作用

asura · 发表于 2012-1-4 13:05:32

回复 5# user3000

谢谢，兄弟，同时也感谢所有回帖的人，真的谢谢你们的帮助！

shuangsexing · 发表于 2012-1-7 09:52:42

不点也能提出吧

		自动登录	找回密码
密码			加入

[GUI管理] 当鼠标点击相关按钮怎么出现一些说明性信息呢（已解决）

相关帖子