Otvorené programovacie prostredie spoločnosti Delphi je založené na použití rôznych komponentov. Komponentom je kód, ktorý vykonáva konkrétnu úlohu pomocou vlastností, udalostí a postupov. Pri vytváraní komponentu musíte nastaviť hodnoty premenných a implementovať kód obslužných rutín udalostí. Aby sa nová súčasť mohla použiť v programe, musí byť zahrnutá v balíku projektu.
Je to nevyhnutné
Vývojové prostredie Delphi
Inštrukcie
Krok 1
Vyberte typ komponentu, ktorý chcete vytvoriť. Môže to byť položka systému Windows, grafická položka, ovládací prvok alebo nevizuálna súčasť. Váš objekt môže dediť aj z ktorejkoľvek existujúcej triedy. Rozhodnite sa o funkciách, ktoré priradíte komponentu k implementácii.
Krok 2
Spustite vývojové prostredie Delphi. V hlavnej ponuke aplikácie otvorte položky Komponent, Nový komponent. V zobrazenom dialógovom okne vyberte v poli Typ predka triedu komponentov, ktorú chcete upraviť. Ak nepoužívate dedičstvo, do poľa Názov triedy jednoducho zadajte názov nového komponentu, ktorý sa začína písmenom „T“. Do poľa Stránka palety napíšte po inštalácii názov karty komponentu a potom kliknite na tlačidlo Vytvoriť jednotku. Vývojové prostredie automaticky vygeneruje šablónu pre nový komponent. Príklad vygenerovaného kódu Pascal:
jednotka MyBtn;
rozhranie
používa
Windows, SysUtils, Správy, Triedy, Ovládacie prvky, Grafika, Formuláre, StdCtrls, Dialógy;
typu
TMyBtn = trieda (TButton)
súkromné
chránené
verejné
publikovaný
koniec;
postup Register;
implementácia
postup Register;
začať
RegisterComponents ('MyComponents', [TMyBtn]);
koniec;
koniec.
Zároveň sa na základe štandardnej triedy tlačidla TButton nevytvorila iba nová trieda TMyBtn, ale je popísaný aj postup registrácie nového komponentu v palete komponentov.
Krok 3
V súkromnej smernici opíšte všetky polia, postupy a funkcie, ktoré potrebujete na vytvorenie komponentu, a budú mať stav skrytý. Zadajte názov poľa (s písmenom „F“), jeho typ. Napríklad záznam v tvare FDatas: integer popisuje premennú FDatas celočíselného typu. V chránenej časti uveďte zoznam obslužných rutín udalostí, ktoré potrebujete, napríklad zo stlačenia klávesnice alebo myši. Pri dedení triedy musíte navyše nastaviť kľúčové slovo override - aby sa prekryl rodičovský obslužný program štandardnej udalosti. Napríklad postup zadávania Kliknite na; override zabezpečí, že bude kliknutie myšou na tlačidlo zastavené.
Krok 4
Funkcie a postupy komponentu, ktorý má užívateľ k dispozícii, sú opísané vo verejných a publikovaných smerniciach, napríklad pomocou záznamu v tvare: funkcia TSysInfo. GetUser: string alebo vlastnosť MachName: string. V poslednej smernici môžete pri použití slova property určiť vlastnosti, ktoré budú dostupné v inšpektore objektov.
Krok 5
Do deklarovaných postupov a funkcií napíšte skutočný kód fungovania komponentu. Vzorový kód obslužného programu:
funkcia MachName: retazec;
var
p: celé číslo;
s: PChar;
začať
c: = stralloc (p);
koniec;
koniec.
Krok 6
Nainštalujte komponent do projektu, ktorý potrebujete. V hlavnej ponuke Delphi zvoľte Component, Install Component. V zobrazenom dialógovom okne otvorte jednu z kariet: Do existujúceho balíka, ak chcete nainštalovať komponent do existujúceho balíka, alebo Do nového balíka - do nového. Kliknite na OK a potvrďte žiadosť aplikácie o prepísanie balíka (ak je to potrebné). Potom bude napísaný komponent pripravený na použitie.
