最简单的方法是使用/AutoIt3ExecuteLine
命令行选项,它允许您从命令行运行 1 行代码。在最简单的情况下,您可以像这样实现它:
_ShowAnotherTooltip(1000, "Hello", 100, 100)
_ShowAnotherTooltip(1000, "World", 200, 200)
Func _ShowAnotherTooltip($time, $text, $x = Default, $y = Default, $title = "", $icon = Default, $options = Default)
Local $cmd = StringFormat("ToolTip(%s,%s,%s,%s,%s)", "'" & $text & "'", $x, $y, "'" & $title & "'", $icon, $options)
Run("""" & @AutoItExe & """ /AutoIt3ExecuteLine ""Sleep(" & $cmd & "*0+" & $time & ")""")
EndFunc ;==>_ShowAnotherTooltip
这里唯一真正的诡计是将工具提示和睡眠放在一条线上。生成的代码将类似于:
Sleep(ToolTip('Hello', 100, 100, '', Default, Default)*0+1000)
根据您的计算机的性能,您可能会看到两个工具提示显示之间有明显的延迟。如果你想让它们同时显示,那么代码会变得有点复杂:
If $CmdLine[0] And $CmdLine[1] = "/ExecuteLine" Then
; This is the child script
; Wait for the window to appear
WinWait($CmdLine[2])
; Then execute the line.
Execute($CmdLine[3])
Exit
EndIf
_AddAnotherTooltip(1000, "Hello", 100, 100)
_AddAnotherTooltip(1000, "World", 200, 200)
_ShowTheTooltips()
Func _ShowTheTooltips()
GUICreate("ShowThoseTooltipsNow")
Sleep(1000)
EndFunc ;==>_ShowTheTooltips
Func _AddAnotherTooltip($time, $text, $x = Default, $y = Default, $title = "", $icon = Default, $options = Default)
Local $cmd = StringFormat("ToolTip(%s,%s,%s,%s,%s)", "'" & $text & "'", $x, $y, "'" & $title & "'", $icon, $options)
Local $iPid
If @Compiled Then
$iPid = Run("""" & @AutoItExe & """ /ExecuteLine ShowThoseTooltipsNow ""Sleep(" & $cmd & "*0+" & $time & ")""")
Else
$iPid = Run("""" & @AutoItExe & """ """ & @ScriptFullPath & """ /ExecuteLine ShowThoseTooltipsNow ""Sleep(" & $cmd & "*0+" & $time & ")""")
EndIf
ProcessWait($iPid)
EndFunc ;==>_AddAnotherTooltip
有更好的进程间通信方法,但这种方法非常简单。
最后,使用GUITooltip * 函数可能有更好的方法。