HyperLink
Bejelentkezés
E-mail: 
Jelszó: 





Skip Navigation Links
 

Időzített "led" komponens


Példaprogram letöltése

10525 bájt

Ebben a példában egy olyan állapotjelző komponenst készítünk, amely egy eljárás meghívása után adott ideig „jelez”, majd az idő lejárta után automatikusan alapállapotba tér vissza. Az állapotot két tetszőlegesen megadható kép jelzi, az időt pedig ezredmásodpercben adhatjuk meg. A komponens olyan esetekben használható jól, ahol például egy folyamat befejezését csak jelezni kell valamennyi ideig.

A mellékelt példaprogram megnyitása előtt a TimedLed.pas-ban lévő komponenst telepítenie kell a Delphi alá.
A komponenst a TCustomControl osztályból származtatjuk. Létrehozunk benne egy TTimer típusú objektumot, amelynek segítségével az időzítést fogjuk megoldani. Ennek OnTimer eseményéhez hozzárendeljük a DoTimer eljárást.
Glyph
Osztály: TTimedLed
property Glyph: TBitmap;
A komponens állapotát két képpel jelezzük. A két képet egy property-ben kell megadni úgy, hogy a megadott bitkép egymás mellett helyezkedjen el, és a szélességük azonos legyen. Ez annyit jelent, hogy a property-ben megadott képet függőlegesen két részre osztjuk, amelynek bal oldali fele lesz az alapállapotban megjelenő kép, a jobb oldali fele pedig az adott ideig megjelenő kép.
Ha a property-ben nem adunk meg képet, akkor az alapértelmezett kép jelenik meg, melyet a komponenshez tartozó erőforrás fájlban tárolunk.
Delay
Osztály: TTimedLed
property Delay: integer;
Ebben a property-ben adhatjuk meg ezredmásodpercben, hogy az aktív állapotot jelző kép mennyi ideig látszódjon az Execute eljárás meghívása után.
Amikor meghívjuk az Execute eljárást, akkor az a Timer objektum Enabled property-jét igazra, az FState globális változó értékét pedig 1-re állítjuk. Alapesetben az FState értéke 0, ez határozza meg, hogy melyik képrészlet jelenjen meg. Amikor a DoTimer eljárás lefut, akkor kikapcsoljuk a Timer-t, és visszaállítjuk az FState változó értékét 1-re.

Cikksorozat

#IDKategóriaCikk címeSorozat
1018DelphiVonalkód készítő komponens1. rész
1028DelphiVonalkód nyomtatása a QuickReport-al2. rész


Könyv
Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 2002 évkönyv 51. 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 |