#include <GUIConstantsEx.au3>
#include <GUIToolTip.au3>
#include <MsgBoxConstants.au3>
#include <WinAPITheme.au3>

Example()

Func Example()
    Local $hGUI = GUICreate(StringTrimRight(@ScriptName, StringLen(".exe")), 350, 200)

    Local $idAdd = GUICtrlCreateButton("Button", 30, 32, 130, 28)
    Local $hAdd = GUICtrlGetHandle($idAdd)

    ; Crée un contrôle info-bulle
    Local $hToolTip = _GUIToolTip_Create($hGUI, $TTS_BALLOON)
    _WinAPI_SetWindowTheme($hToolTip, "", "")

    ; Change les paramètres de couleur de l'infobulle
    ; La valeur Color utilisée dans la fonction _GUIToolTip_SetTipBkColor est une valeur COLORREF (BGR)
    _GUIToolTip_SetTipBkColor($hToolTip, 0x395A00)
    ; La valeur Color utilisée dans la fonction _GUIToolTip_SetTipTextColor est une valeur COLORREF (BGR)
    _GUIToolTip_SetTipTextColor($hToolTip, 0x1EBFFF)

    ; Ajoute un élément au contrôle info-bulle
    _GUIToolTip_AddTool($hToolTip, 0, "This is the ToolTip text", $hAdd)
    GUISetState(@SW_SHOW)

    ; Obtient la couleur texte de l'info-bulle.
    MsgBox($MB_SYSTEMMODAL, 'Message', 'Text color : 0x' & Hex(_GUIToolTip_GetTipTextColor($hToolTip), 6))

    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

    ; Détruit le contrôle info-bulle
    _GUIToolTip_Destroy($hToolTip)
    GUIDelete($hGUI)
EndFunc   ;==>Example