Seite 1 von 1
durchsichtige fenster
Verfasst: 26.08.2011 21:19
von delikanli_19_82
hallo leute,
ich würde gerne unter windows, linux und mac fenster nach grad durchsichtig scheinen lassen.
hat irgendwer eine idee, wie das zu machen wäre?
mfg
kurt
Re: durchsichtige fenster
Verfasst: 26.08.2011 22:30
von Bisonte
Unter Windows nutze ich diese beiden Prozeduren. Da ich nicht weiss welche Art Du nun genau meinst.
Code: Alles auswählen
Procedure.i SetWindowTransparency(Window.i, transparency.i) ; Fenster durchsichtig machen (transparency : 0-255)
If IsWindow(Window)
Protected WindowID = WindowID(Window)
SetWindowLongPtr_(WindowID,#GWL_EXSTYLE,#WS_EX_LAYERED)
SetLayeredWindowAttributes_(WindowID,0,transparency,#LWA_ALPHA)
EndIf
EndProcedure
Procedure.i SetWindowCutColor(Window.i, Color.i) ; Fensterpixel mit Farbe Color.i durchsichtig machen (RGB() werte)
If IsWindow(Window)
Protected WindowID = WindowID(Window)
SetWindowLongPtr_(WindowID,#GWL_EXSTYLE,#WS_EX_LAYERED)
SetLayeredWindowAttributes_(WindowID,Color,0,#LWA_COLORKEY)
EndIf
EndProcedure
bei den anderen Systemen weiss ich nicht wie das geht ... sorry
Re: durchsichtige fenster
Verfasst: 27.08.2011 19:19
von delikanli_19_82
hallo Bisonte,
die methode SetWindowTransparency entspricht meiner vorstellung.
die lösung für mac und linux sind auch wichtig. naja, muss weiter danach suchen.
vielen dank für dein beispiel.
mfg
kurt
Re: durchsichtige fenster
Verfasst: 29.08.2011 01:27
von TheCube
Ich fand es auch sehr nützlich, besonders das SetWindowCutColor kannte ich noch nicht.
Danke.
