HyperLink
Bejelentkezés
E-mail: 
Jelszó: 





Skip Navigation Links
 

LayeredWindow használata Win2000-ben


Példaprogram letöltése

10529 bájt

A Win 2000 egyik újdonsága, hogy az ablakokat úgy is meg tudja jeleníteni, hogy azok egy általunk megadott százalékban átlátszóak legyenek.

Mellékelt példában közreadunk egy olyan Delphi komponenst, mely kezeli a Win 2000 ezen újdonságát.

A mellékelt példaprogram megnyitása előtt a LayeredWindow.pas-ban lévő komponenst telepítenie kell a Delphi alá.

A program futtatása után próbálja meg mozgatni a Form-ot.

A komponens használatához először is helyezzük azt arra a Form-ra, melyet átlátszóvá szeretnénk tenni.

Az átlátszóságot a komponens Enabled property-ének igazra állításával engedélyezhetjük.

Ha például a Flag property tartalmazza az flColorKey értéket is, akkor a Color property-ben megadott szín nem lesz átlátszó.

Az átlátszóság használatához a komponens beállítja a Form-nál a WS_EX_LAYERED stílust. Ezek után a SetLayeredWindowAttributes függvény hívásával elérhető a property-kben megadott értékek alapján, hogy a Form-unk átlátszó legyen.

Mivel a SetLayeredWindowAttributes a Delphi jelenlegi verzióiban még nem deklaráltak, így ezt nekünk kell megtenni a használat előtt.

function SetLayeredWindowAttributes(hwnd: HWND; crKey: longint; bAlpha: byte; dwFlags: longint): longint; stdcall; external user32;




Cikksorozat



Könyv
Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 2000 évkönyv 484. oldal

Felhasználási feltételek
A Software Online szoftverfejlesztői magazin mindegyik cikke, minden megjelent képe, és egyéb publikált anyaga szerzői jog védelme alatt áll! Bármilyen formában történő másodlagos terjesztésük, közzétételük vagy felhasználásuk kizárólag a kiadó előzetes írásbeli engedélyével történhet!

Copyright © 1999-2012 Animare Software Kft. Minden jog fenntartva!
| Készült: Animare Stúdió | Adatvédelem | Kapcsolat |