Window Half Transparent

Alles over het toepassen van API en DLL's in Liberty BASIC

Moderator: anthonio

Window Half Transparent

Berichtdoor glpape » za feb 12, 2011 9:46 pm

Op zoek naar de API functie (functies ?) waarmee je een window gedeeltelijk transparant kunt maken. Niet gevonden in AlyceW's voortreffelijke boek.

Vr groet,

George Pape.
glpape
 
Berichten: 83
Geregistreerd: za nov 08, 2008 5:32 pm

Re: Window Half Transparent

Berichtdoor Gordon » zo feb 13, 2011 2:32 am

Hmmm ....,

Niets gevonden in het API book? Dat zal ik ook nagaan.
Hier staat wel wat.

http://lbpe.wikispaces.com/LayeredWindowTransparency]


en dit is een stuk uit een listing van mij
Code: Selecteer alles
#1.g "down; drawbmp molen1 ;flush"
hwnd1 = hwnd(#m)
for i = 0 to 255 '255 to 0 step -2
call MakeWindowTransparent hwnd1, i
calldll #kernel32, "Sleep",50 as long, re as void
next i
.
.
.

sub MakeWindowTransparent hwnd, transparency
calldll #user32, "GetWindowLongA", hwnd as ulong, -20 as long,_
r as long
x = r or 524288
calldll #user32, "SetWindowLongA", hwnd as ulong, -20 as long,_
x as long, r as long
calldll #user32, "SetLayeredWindowAttributes", hwnd as ulong,_
0 as long, transparency as long, 2 as long, r as long
end sub






Gordon
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am

Re: Window Half Transparent

Berichtdoor glpape » zo feb 13, 2011 1:21 pm

Dank je wel Gordon, dit is het.
Ik denk dat het een wat nieuwere API functie is want het is ook pas de laatste jaren dat we zoveel doorzichtige vensters op internet sites zien.

Vr groet,

George Pape.
glpape
 
Berichten: 83
Geregistreerd: za nov 08, 2008 5:32 pm


Keer terug naar API/DLL

Wie is er online

Gebruikers op dit forum: Geen geregistreerde gebruikers. en 1 gast

cron