Cela peut aider aussi a comprendre comment gérer la transparance des fenetres !!
Voici le script :
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
GUICreate ("Niveau de la transparance",250,50)
$slider = GUICtrlCreateSlider (1,1,250,20)
GUICtrlSetLimit (-1,255,50)
GUICtrlSetData (-1,255)
GUISetState (@sw_show)
While 1
$var = WinList ()
$msg = GUIGetMsg ()
$1 = GUICtrlRead ($slider)
$2 = GUICtrlRead ($slider)
If $2 >= $1 Or $2 <= $1 Then
_tr ()
EndIf
If $msg = $GUI_EVENT_CLOSE Then
For $i = 1 to $var [0][0]
WinSetTrans ($var [$i][0],"",255)
Next
Exit
EndIf
WEnd
Func _tr ()
For $i = 1 to $var [0][0]
WinSetTrans ($var [$i][0],"",GUICtrlRead ($slider))
Next
EndFunc