Odprto programsko okolje Delphija temelji na uporabi različnih komponent. Komponenta je koda, ki izvaja določeno nalogo z uporabo lastnosti, dogodkov in postopkov. Pri ustvarjanju komponente morate nastaviti vrednosti spremenljivk in implementirati kodo obdelovalcev dogodkov. Za uporabo v programu mora biti nova komponenta vključena v projektni paket.
Potrebno je
Razvojno okolje Delphi
Navodila
Korak 1
Izberite vrsto komponente, ki jo želite ustvariti. Lahko je element sistema Windows, grafični element, kontrolni objekt ali nevizualna komponenta. Vaš objekt lahko tudi podeduje iz katerega koli obstoječega razreda. Odločite se za funkcije, ki jih boste dodelili komponenti za izvajanje.
2. korak
Zaženite razvojno okolje Delphi. V glavnem meniju aplikacije odprite elemente Komponenta, Nova komponenta. V pogovornem oknu, ki se prikaže, v polju Vrsta prednika izberite razred komponente, ki jo želite spremeniti. Če ne uporabljate dedovanja, v polje Ime razreda preprosto vnesite ime nove komponente, ki se začne s črko "T". V polje Stran palete po namestitvi napišite ime zavihka komponente in kliknite gumb Ustvari enoto. Razvojno okolje bo samodejno ustvarilo predlogo za novo komponento. Primer ustvarjene kode Pascal:
enota MyBtn;
vmesnik
uporablja
Windows, SysUtils, Sporočila, Razredi, Kontrole, Grafika, Obrazci, StdCtrls, Dialogi;
tip
TMyBtn = razred (TButton)
zasebno
zaščiten
javnosti
objavljeno
konec;
postopek Register;
izvajanje
postopek Register;
začeti
RegisterComponents ('MyComponents', [TMyBtn]);
konec;
konec.
Hkrati ni bil oblikovan samo nov razred TMyBtn na podlagi standardnega razreda gumba TButton, temveč je opisan tudi postopek registracije nove komponente v paleti komponent.
3. korak
V zasebni direktivi opišite vsa polja, postopke in funkcije, ki jih potrebujete za izdelavo komponente, in imela bodo status skritih. Navedite ime polja (s črko "F") in njegovo vrsto. Na primer zapis oblike FDatas: integer opisuje spremenljivko FDatas celoštevilskega tipa. V zaščitenem odseku naštejte upravljavce dogodkov, ki jih potrebujete, na primer s pritiskom tipk na tipkovnici ali miški. Poleg tega morate pri dedovanju razreda nastaviti ključno besedo override - da se prekriva nadrejeni obdelovalec standardnega dogodka. Na primer postopek vnosa Click; override zagotavlja, da se klik miške na gumb prestreže.
4. korak
Funkcije in postopki komponente, ki so na voljo uporabniku, so opisani v javnih in objavljenih direktivah, na primer z uporabo zapisa v obliki: function TSysInfo. GetUser: string ali lastnosti MachName: string. V zadnji direktivi lahko pri uporabi besede lastnost določite lastnosti, ki bodo na voljo v pregledovalniku objektov.
5. korak
V deklarirane postopke in funkcije vpišite dejansko kodo za delovanje komponente. Vzorčna koda vodnika:
funkcija MachName: niz;
var
p: celo število;
z: PChar;
začeti
c: = stralloc (p);
konec;
konec.
6. korak
Komponento namestite v projekt, ki ga potrebujete. V glavnem meniju Delphi izberite Component, Install Component. V pogovornem oknu, ki se odpre, odprite enega od zavihkov: V obstoječi paket, če želite komponento namestiti v obstoječi paket, ali V nov paket - v novega. Kliknite V redu in potrdite zahtevo aplikacije za prepis paketa (če je potrebno). Po tem bo napisana komponenta pripravljena za uporabo.