Transparentes Gui? :o

  • Hallo, ich bin es nochmal.

    Ich würde es gerne schaffen, dass mein GUI Transparent ist. Ich habe es bisher mit $WS_EX_TRANSPARENT versucht, aber das scheint irgendwie nicht zu klappen. :o
    Hier mal mein Code, ihr könnt mir bestimmt sagen was ich falsch mache. :)

    Spoiler anzeigen
    [autoit]

    #include #include #include #include #include #include #include
    #Region ### START Koda GUI section ### Form=C:\Users\Admin\Desktop\Selbstbaubot\GUI\Forms\deskplayer.kxf$Form1 = GUICreate("Deskplayer", 122, 91, 242, 222,$WS_POPUP,BitOR($WS_EX_TRANSPARENT,$WS_EX_TOOLWINDOW,$GUI_WS_EX_PARENTDRAG))$Button1 = GUICtrlCreateButton("Back", 0, 40, 40, 25, 0)$Button2 = GUICtrlCreateButton("Play", 40, 40, 40, 25, 0)$Button3 = GUICtrlCreateButton("Next", 80, 40, 40, 25, 0)$Button4 = GUICtrlCreateButton("Open", 0, 65, 59, 24, 0)$Button5 = GUICtrlCreateButton("Volume", 61, 65, 59, 24, 0)$Label1 = GUICtrlCreateLabel("", 0, 0, 120, 40,default ,$GUI_WS_EX_PARENTDRAG)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###
    Global $stopped = 0Global $open = 0
    While 1$nMsg = GUIGetMsg()if $nMsg = $Button1 Then back()if $nMsg = $Button2 Then playpause()if $nMsg = $Button3 Then fnext()if $nMsg = $Button4 Then open()if $nMsg = $GUI_EVENT_CLOSE Then Exit
    WEnd

    [/autoit]

    Gruß Bing. :)

  • ich seh da leider nur eine zeile :( vielleicht nochmal posten, dann kann man besser helfen :)

  • Hab die Datei jetzt hochgeladen, das Kopieren klappt bei mir nie, weiss der Geier warum. :(

  • Fenster setzt man transparenz per

    [autoit]

    WinSetTrans("Titel",Transparenz von 0 bis 255)

    [/autoit]

    Sorry, hatte den Beitrag gestern nicht gesehen. Danke, Transparent ist es jetzt, nur leider kann ich jetzt das Fenster nicht mehr bewegen. Gibt es dafür auch eine Lösung? :o

    Einmal editiert, zuletzt von bingbongman (8. Mai 2009 um 13:48)

  • @ bingbongman
    Was sagt denn die Suchfunktion und die Hilfe dazu?
    Hast Du die dortigen Beispiel ausprobiert und verstanden?

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    k3mrwmIBHejryPvylQSFieDF5f3VOnk6iLAVBGVhKQegrFuWr3iraNIblLweSW4WgqI0SrRbS7U5jI3sn50R4a15Cthu1bEr

  • Dann haste es wohl als Popup?

    Kannst entweder im OnEventMode _PrimeDown benutzen, Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Opt ( "GuiOnEventMode", 1 )

    [/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 193, 125, $WS_POPUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, "_PrimeDown")

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _PrimeDown()
    Local $DifX, $DifY, $MouseData = GUIGetCursorInfo(@GUI_WinHandle)
    Local $WinPos = WinGetPos(@GUI_WinHandle)
    Local $MPos = MouseGetPos()
    $DifX = $MPos[0] - $WinPos[0]
    $DifY = $MPos[1] - $WinPos[1]
    Do
    Sleep(15)
    $MPos = MouseGetPos()
    $MouseData = GUIGetCursorInfo(@GUI_WinHandle)
    Until ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Or (Not $MouseData[2])
    ;~ GUICtrlSetCursor($background, 9)
    While $MouseData[2]
    $MPos = MouseGetPos()
    $WinPos = WinGetPos(@GUI_WinHandle)
    If ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Then
    WinMove(@GUI_WinHandle, '', $MPos[0] - $DifX, $MPos[1] - $DifY)
    EndIf
    Sleep(15)
    $MouseData = GUIGetCursorInfo(@GUI_WinHandle)
    WEnd
    ;~ GUICtrlSetCursor($background, 2)
    EndFunc ;==>_PrimeDown

    [/autoit]

    Oder einfach nen Label erstellen mit $GUI_WS_EX_PARENTDRAG, Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    GUICreate('POPUP', 400, 400, -1, -1, $WS_POPUP)
    GUICtrlCreateLabel("", 0, 0, 400, 400, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    Do
    Sleep(20)
    Until GUIGetMsg() = -3

    [/autoit]