Das ist ein Script, um die Darstellung des guis mit der Aero wasweissich machen.
Testet es mal. und nein, das script is nich mir, habs mal in meinem usb-stick gefunden.
Code
$Struct = DllStructCreate("int cxLeftWidth;int cxRightWidth;int cyTopHeight;int cyBottomHeight;")
Func _Vista_ApplyGlass($hWnd, $bColor = 0x000000)
If @OSVersion <> "WIN_VISTA" and @OSVersion <> "WIN_7" Then
MsgBox(16, "_Vista_ApplyGlass", "You are not running Vista!")
Exit
Else
GUISetBkColor($bColor); Must be here!
$Ret = DllCall("dwmapi.dll", "long", "DwmExtendFrameIntoClientArea", "hwnd", $hWnd, "long*", DllStructGetPtr($Struct))
If @Error Then
Return 0
SetError(1)
Else
Return $Ret
EndIf
EndIf
EndFunc ;==>_Vista_ApplyGlass
Func _Vista_ApplyGlassArea($hWnd, $Area, $bColor = 0x000000)
If @OSVersion <> "WIN_VISTA" and @OSVersion <> "WIN_7" Then
MsgBox(16, "_Vista_ApplyGlass", "You are not running Vista!")
Exit
Else
If IsArray($Area) Then
DllStructSetData($Struct, "cxLeftWidth", $Area[0])
DllStructSetData($Struct, "cxRightWidth", $Area[1])
DllStructSetData($Struct, "cyTopHeight", $Area[2])
DllStructSetData($Struct, "cyBottomHeight", $Area[3])
GUISetBkColor($bColor); Must be here!
$Ret = DllCall("dwmapi.dll", "long*", "DwmExtendFrameIntoClientArea", "hwnd", $hWnd, "ptr", DllStructGetPtr($Struct))
If @Error Then
Return 0
Else
Return $Ret
EndIf
Else
MsgBox(16, "_Vista_ApplyGlassArea", "Area specified is not an array!")
EndIf
EndIf
EndFunc ;==>_Vista_ApplyGlassArea
Beispiel
$hWnd = GuiCreate("is egal",?,?,?,?)
_Vista_ApplyGlass($hWnd,$bColor = 0x000000) ; 0x000000 ist für den aktuellen Farbe
...
nich pöse sein, is mein erster Code Post
Edit: der code im Spoiler wurde geändert! der script im anhang ist noch der alte