name22

ToolTipEx Example

Jun 29th, 2011
275
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include <ToolTipEx.au3>
  2. #include <GUIConstants.au3>
  3.  
  4. _ToolTip_FontSetOptions("Segoe Print", 8)
  5.  
  6. $fTimer = TimerInit()
  7.  
  8. While Sleep(30)
  9.     $aMousePos = MouseGetPos()
  10.     Switch TimerDiff($fTimer) >= 3000
  11.         Case False
  12.             _ToolTip_Create("MousePos:" & @CRLF & $aMousePos[0] & ":" & $aMousePos[1], $aMousePos[0], $aMousePos[1] - 15, 0)
  13.         Case True
  14.             _ToolTip_FontSetOptions("Segoe Script", 12)
  15.             _ToolTip_TextSetColor(0xD0202020)
  16.             For $iTransparency = 0 To 100
  17.                 $aMousePos = MouseGetPos()
  18.                 _ToolTip_Create("name22", $aMousePos[0], $aMousePos[1] - 15, 0)
  19.                 _ToolTip_BGSetColor("0x" & Hex(Floor(208 / 100 * (100 - $iTransparency)), 2) & "202020")
  20.                 _ToolTip_BorderSetColor("0x" & Hex(Floor(224 / 100 * (100 - $iTransparency)), 2) & "E57913")
  21.                 _ToolTip_TextSetColor("0x" & Hex(Floor(208 / 100 * (100 - $iTransparency)), 2) & "202020")
  22.                 Sleep(30)
  23.             Next
  24.             Exit
  25.     EndSwitch
  26. WEnd
RAW Paste Data