HyperLink


Bejelentkezés
E-mail: 
Jelszó: 






Skip Navigation Links
 

Helyezzünk képet a TListBox minden egyes eleme elé


Példaprogram letöltése

7968 bájt

Ebben a példában egy olyan technikát mutatunk be, melynek segítségével képesek leszünk egy TImageList komponensben lévő képeket a TListBox egyes elemei előtt megjeleníteni.

Ebben a példában egy olyan technikát mutatunk be, melynek segítségével képesek leszünk egy TImageList komponensben lévő képeket a TListBox egyes elemei előtt megjeleníteni.


Ehhez a TListBox Style property-énél az lbOwnerDrawVariable értéket kell választanunk.

Ettől kezdve nekünk kell gondoskodnunk az elemek megjelenítéséről.

Az OnMeasureItem eseménynél a komponens megkérdezi, hogy az egyes sorok magassága mennyi legyen. Itt a TImageList komponensben tárolt képek magasságát adjuk értékül.

A tényleges kirajzolás az OnDrawItem eseménynél történik.

Itt átmenetileg létre kell hoznunk egy TBitmap típusú változót a kép ideiglenes tárolásához.

Első lépésként kiírjuk az adott elem szövegét a TextOut eljárással. Paraméterként kapunk egy Index nevű változót, melyből megtudhatjuk, hogy hányadik elemet kell megjelenítenünk.

A Rect nevű TRect típusú változóban kapjuk meg annak a területnek a koordinátáit, melyre a rajzolást el kell végeznünk.

Az adott sorszámú képet a GetBitmap függvénnyel nyerjük ki a TImageList komponensből az átmenetileg létrehozott TBitmap típusú változóba.

Ezek után a Draw eljárással már képesek vagyunk az adott képet kirajzolni a TListBox komponensre.

Cikksorozat

#IDKategóriaCikk címeSorozat
3520DelphiSQL nézettáblák használata1. rész
3559DelphiSQL nézettáblák létrehozása, törlése2. rész
3586DelphiRekordműveletek nézettáblákon keresztül3. rész
3617DelphiNéhány hasznos lehetőség4. rész


Könyv
Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 1999 évkönyv 306. 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-2010 Animare Software Kft. Minden jog fenntartva!
| Készült: Animare Stúdió | Adatvédelem | Kapcsolat |