hallo, ich versuche jetzt schon seit geraumer zeit, mein gui ( für darkmusikplayer) hintergrund gleich zu kriegen.
Mit den Windows_Ex_Transparent funkt es nicht. Hat jemand eine idee , wie man das hinkriegt, das dass gui nach dem verlassen mit der maus, sich dem hintergrudn anpasst ?
Gui Hintergrund ?
-
- [ gelöst ]
-
darksider3 -
7. August 2010 um 15:01 -
Geschlossen -
Erledigt
-
-
So in etwa?
(ist nur quick 'n' dirty )Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]$gui = GUICreate("Meine Gui", 401, 301)
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW)AdlibRegister("CheckMouse")
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEndFunc CheckMouse()
[/autoit]
$aMpos = MouseGetPos()
$aWpos = WinGetPos("Meine Gui")
If $aMpos[0] > $aWpos[0] And $aMpos[0] < $aWpos[0] + $aWpos[2] And $aMpos[1] > $aWpos[1] And $aMpos[1] < $aWpos[1] + $aWpos[3] Then
WinSetTrans("Meine Gui", "", 255)
Else
WinSetTrans("Meine Gui", "", 50)
EndIf
EndFunc -
So siehts etwas schöner aus ^^:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit]
$mouseout=0
$gui = GUICreate("Meine Gui", 401, 301)
GUISetState(@SW_SHOW)
AdlibRegister("CheckMouse")
While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func CheckMouse()
$aMpos = MouseGetPos()
$aWpos = WinGetPos("Meine Gui")
If $aMpos[0] > $aWpos[0] And $aMpos[0] < $aWpos[0] + $aWpos[2] And $aMpos[1] > $aWpos[1] And $aMpos[1] < $aWpos[1] + $aWpos[3] Then
If $mouseout=1 Then
For $i=30 to 255 Step 30
WinSetTrans("Meine Gui", "", $i)
sleep(50)
Next
WinSetTrans("Meine Gui", "", 255)
$mouseout=0
EndIf
Else
If $mouseout=0 Then
For $i=255 to 30 Step -30
WinSetTrans("Meine Gui", "", $i)
sleep(50)
Next
$mouseout=1
EndIf
EndIf
EndFunc -