DllCall, user32&uxtheme and colorchanging tooltips

[astrionn]

So I had this Idea of creating a tooltip which shows me my ping.

That itself was made quickly and I thought too add a couple features.

I want the tooltip background to be a different color depending on the ping. (good ping is green, medium ping is yellow,...)

So how do I color in a tooltip? google brought me to this: 

 

where in the comments I found this:

$s = "LOW"
ToolTip($s, 0, 0, "Battery Information");, $icon)
$H_TOOLTIP1 = WinGetHandle($s)
DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", $H_TOOLTIP1, "wstr", "", "wstr", "")
DllCall("user32.dll", "int", "SendMessage", "hwnd", $H_TOOLTIP1, "int", 1043, "int", 2552550, "int", 0)
Sleep(1000)

Which I then used in my code with different color codes... Trial and Error brought me these that I wanted to use:

Quote

;2550255 yellow
;00255 red
;0255255 green
;000 black

 

The Problem is if I loop through my code it only sets the color for the 1st loop and then sticks to it.

The real problem is tho that I don't exactly understand the dllcalls... And I guess that's why it isn't working

So if someone would be so awesome to explain to me how they work, or at least can give me a list of these parameters then I would really appreciate that and learn something new

Obviously a solution to my problem is awesome aswell ^^

I run this under Windows 8.1

There is my code in a paste.

https://pastebin.com/q525f7mS

Edited June 18, 2017 by astrionn
added OS

[anthonyjr2]

The calls are fine, your real problem is how you are evaluating each if statement. You can't do "1 <= $ping < 250" in AutoIt. This is how it should be done:

expandcollapse popup

HotKeySet("{ESC}","close")

pingpong()

Func pingpong()
   While True
      $ping=ping("8.8.8.8",3000)
      $s = string($ping)

      If $ping = 0 Then
         ToolTip("N/A",0,0)
         $H_TOOLTIP1 = WinGetHandle($s)
         DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", $H_TOOLTIP1, "wstr", "", "wstr", "")
         DllCall("user32.dll", "int", "SendMessage", "hwnd", $H_TOOLTIP1, "int", 1043, "int", 000, "int", 0)
      ElseIf $ping >= 1 And $ping < 250 Then
         ToolTip($s&" ms",0,0)
         $H_TOOLTIP1 = WinGetHandle($s)
         DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", $H_TOOLTIP1, "wstr", "", "wstr", "")
         DllCall("user32.dll", "int", "SendMessage", "hwnd", $H_TOOLTIP1, "int", 1043, "int", 0255255, "int", 0)
      ElseIf $ping >= 250 And $ping < 750 Then
         ToolTip($s&" ms",0,0)
         $H_TOOLTIP1 = WinGetHandle($s)
         DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", $H_TOOLTIP1, "wstr", "", "wstr", "")
         DllCall("user32.dll", "int", "SendMessage", "hwnd", $H_TOOLTIP1, "int", 1043, "int", 2550255, "int", 0)
      ElseIf $ping >= 750 Then
         ToolTip($s&" ms",0,0)
         $H_TOOLTIP1 = WinGetHandle($s)
         DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", $H_TOOLTIP1, "wstr", "", "wstr", "")
         DllCall("user32.dll", "int", "SendMessage", "hwnd", $H_TOOLTIP1, "int", 1043, "int", 00255, "int", 0)
      EndIf
      Sleep(500)
   WEnd
EndFunc

Func close()
    Exit
EndFunc

 

[MazeM]

Nice job, but this code creates a new Tooltip at every ping, and changes it color - even if nothing changed.

Is it possible to update the Tooltip text/title with a DLLCall too?

[BrewManNH]

There is a ToolTip UDF included with AutoIt, look in the help file for the _GUIToolTip* functions.