Вот такой простенький пример реализации появления подказки над треем, если мышь переместить в верхний правый угол экрана:
Код:
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$header4ttip="Заголовок"
$txt4ttip="Это текст первой строки содержится внутри вплывающей подсказки"&@LF&@LF&"А это уже текст для третьей строки"
$mxmin=@DesktopWidth-20
$mymin=0
$mxmax=@DesktopWidth
$mymax=20
$Form1 = GUICreate("Form1", 193, 105, @DesktopWidth - 194, @DesktopHeight-137, BitOR($WS_POPUP,$WS_BORDER), $WS_EX_TOOLWINDOW)
GUISetBkColor(0xFFFFE1)
GUISetOnEvent($GUI_EVENT_CLOSE, "exit_gui")
$hd_lab = GUICtrlCreateLabel($header4ttip, 6, 2, 87, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$txtlabel = GUICtrlCreateLabel($txt4ttip, 6, 24, 179, 78)
GUICtrlSetOnEvent(-1, "txtlabelClick")
GUISetState(@SW_HIDE)
While 1
$mpos=MouseGetPos()
ToolTip("х="&$mpos[0]&" y="&$mpos[1], 0, 0)
If $mpos[0] >= $mxmin And $mpos[0] <= $mxmax And $mpos[1] >= $mymin And $mpos[1] <= $mymax Then
GUISetState(@SW_SHOW)
Else
GUISetState(@SW_HIDE)
EndIf
$mpos=false
Sleep(25)
Wend
Func exit_gui()
Exit
EndFunc
ЗЫ:
Цитата:
Цитата wwe
из-за горизонта экрана появлялася всплывающая »
|
- это в принципе можно реализовать с помощью WinMove(), но эта функция ведет себя очень странно... |
