Delphi-ning ochiq dasturlash muhiti turli xil tarkibiy qismlardan foydalanishga asoslangan. Komponent - bu xususiyatlar, hodisalar va protseduralar yordamida ma'lum bir vazifani bajaradigan kod. Komponent yaratishda siz o'zgaruvchilar qiymatlarini o'rnatishingiz va voqea ishlovchilarining kodini amalga oshirishingiz kerak. Dasturda foydalanish uchun yangi komponent loyiha to'plamiga kiritilishi kerak.
Bu zarur
Delphi rivojlanish muhiti
Ko'rsatmalar
1-qadam
Yaratish uchun komponent turini tanlang. Bu Windows elementi, grafik element, boshqaruv ob'ekti yoki ingl. Shuningdek, sizning ob'ektingiz mavjud bo'lgan har qanday sinfdan meros qilib olishi mumkin. Amalga oshirish uchun komponentni tayinlaydigan funktsiyalar to'g'risida qaror qabul qiling.
2-qadam
Delphi rivojlanish muhitini boshlang. Dasturlarning asosiy menyusida Komponent, Yangi komponentlar bandlarini oching. Ko'rsatilgan dialog oynasida, Ancestor Type maydonida o'zgartirmoqchi bo'lgan komponentlar sinfini tanlang. Agar siz merosdan foydalanmasangiz, "Class Name" maydoniga shunchaki "T" harfi bilan boshlanadigan yangi komponent uchun nom kiriting. Palitra sahifasi maydoniga o'rnatilgandan so'ng komponent yorlig'ining nomini yozing, so'ngra Birlik yaratish tugmachasini bosing. Rivojlanish muhiti avtomatik ravishda yangi komponent uchun shablonni yaratadi. Yaratilgan Paskal kodiga misol:
MyBtn birligi;
interfeys
foydalanadi
Windows, SysUtils, xabarlar, sinflar, boshqaruv elementlari, grafikalar, shakllar, StdCtrls, dialoglar;
turi
TMyBtn = sinf (TButton)
xususiy
himoyalangan
jamoat
nashr etilgan
oxiri;
protsedura registri;
amalga oshirish
protsedura registri;
boshlanishi
RegisterComponentlar ('MyComponentlar', [TMyBtn]);
oxiri;
oxiri.
Shu bilan birga TButton tugmachasining standart klassi asosida nafaqat yangi TMyBtn klassi shakllandi, balki komponentlar palitrasida yangi komponentani ro'yxatdan o'tkazish tartibi ham tavsiflandi.
3-qadam
Xususiy ko'rsatmada siz komponent yaratishingiz kerak bo'lgan barcha maydonlarni, protseduralarni va funktsiyalarni tavsiflang, shunda ular yashirin holatiga ega bo'ladi. Maydon nomini ("F" harfi bilan), uning turini ko'rsating. Masalan, FDatas: integer shaklidagi yozuv butun sonli o'zgaruvchining FDatas-ni tavsiflaydi. Himoyalangan bo'limda, masalan, klaviatura yoki sichqoncha tugmachalarini bosish orqali kerakli voqea ishlovchilarini ro'yxatlang. Bundan tashqari, sinfni meros qilib olayotganda, standart hodisaning asosiy ishlov beruvchisi bilan ustma-ust kelish uchun kalit so'zni o'rnatishingiz kerak. Masalan, Klik kirish tartibi; bekor qilish tugmani bosgan sichqonchani ushlab turilishini ta'minlaydi.
4-qadam
Komponentning funktsiyalari va protseduralari foydalanuvchi uchun mavjud bo'lib, ommaviy va e'lon qilingan direktivalarda tavsiflanadi, masalan, formadagi yozuv yordamida: function TSysInfo. GetUser: string yoki property MachName: string. Oxirgi direktivada property so'zidan foydalanilganda siz ob'ekt inspektorida mavjud bo'ladigan xususiyatlarni belgilashingiz mumkin.
5-qadam
E'lon qilingan protsedura va funktsiyalarda komponentning ishlashi uchun haqiqiy kodni yozing. Namuna ishlov beruvchining kodi:
MachName funktsiyasi: string;
var
p: tamsayı;
bilan: PChar;
boshlanishi
c: = stralloc (p);
oxiri;
oxiri.
6-qadam
Komponentni kerakli loyihaga o'rnating. Delphi asosiy menyusidan Komponent, O'rnatish komponentasini tanlang. Ko'rsatilgan dialog oynasida yorliqlardan birini oching: Amaldagi paketga, agar siz komponentni mavjud paketga o'rnatmoqchi bo'lsangiz yoki Into new paketga - yangisiga. OK tugmachasini bosing va paketning ustiga yozish uchun iltimosnomani tasdiqlang (agar kerak bo'lsa). Shundan so'ng, yozilgan komponent foydalanishga tayyor bo'ladi.
