Persekitaran terbuka Delphi berdasarkan penggunaan pelbagai komponen. Komponen adalah kod yang melakukan tugas tertentu menggunakan sifat, peristiwa, dan prosedur. Semasa membuat komponen, anda perlu menetapkan nilai pemboleh ubah dan menerapkan kod pengendali peristiwa. Untuk digunakan dalam program, komponen baru mesti dimasukkan ke dalam pakej projek.
Ia perlu
Persekitaran pembangunan Delphi
Arahan
Langkah 1
Pilih jenis komponen yang akan dibuat. Ia boleh menjadi item Windows, item grafik, objek kawalan, atau komponen bukan visual. Juga, objek anda boleh diwarisi dari kelas yang ada. Tentukan fungsi yang akan anda tetapkan komponen untuk dilaksanakan.
Langkah 2
Mulakan persekitaran pembangunan Delphi. Di menu aplikasi utama, buka item Komponen, Komponen Baru. Dalam kotak dialog yang muncul, di medan Jenis Leluhur, pilih kelas komponen yang ingin anda ubah. Sekiranya anda tidak menggunakan warisan, di medan Nama Kelas, masukkan nama untuk komponen baru yang bermula dengan huruf "T". Di medan Halaman Palet, tulis nama tab komponen selepas pemasangan, kemudian klik butang Buat Unit. Persekitaran pembangunan secara automatik akan menghasilkan templat untuk komponen baru. Contoh kod Pascal yang dihasilkan:
unit MyBtn;
antara muka
kegunaan
Windows, SysUtils, Mesej, Kelas, Kawalan, Grafik, Bentuk, StdCtrls, Dialog;
menaip
TMyBtn = kelas (TButton)
peribadi
dilindungi
awam
diterbitkan
akhir;
prosedur mendaftar;
pelaksanaan
prosedur mendaftar;
bermula
RegisterComponents ('MyComponents', [TMyBtn]);
akhir;
akhir.
Pada masa yang sama, tidak hanya TMyBtn kelas baru dibentuk berdasarkan kelas standard butang TButton, tetapi juga prosedur untuk mendaftarkan komponen baru dalam palet komponen dijelaskan.
Langkah 3
Dalam arahan peribadi, terangkan semua bidang, prosedur dan fungsi yang anda perlukan untuk membuat komponen, dan statusnya akan tersembunyi. Nyatakan nama bidang (dengan huruf "F"), jenisnya. Contohnya, rekod bentuk FDatas: integer menerangkan pemboleh ubah FDatas jenis integer. Di bahagian yang dilindungi, senaraikan pengendali acara yang anda perlukan, misalnya, dari penekanan kekunci papan kekunci atau tetikus. Lebih-lebih lagi, semasa mewarisi kelas, anda mesti menetapkan kata kunci ganti - untuk bertindih dengan pengendali ibu bapa acara standard. Contohnya, prosedur kemasukan Klik; ganti memastikan bahawa klik tetikus pada butang dipintas.
Langkah 4
Fungsi dan prosedur komponen yang tersedia untuk pengguna dijelaskan dalam arahan umum dan diterbitkan, misalnya, menggunakan catatan bentuk: fungsi TSysInfo. GetUser: string atau harta MachName: string. Dalam arahan terakhir, ketika menggunakan kata sifat, anda dapat menentukan sifat yang akan tersedia di objek pemeriksa.
Langkah 5
Tuliskan kod sebenar untuk fungsi komponen dalam prosedur dan fungsi yang dinyatakan. Contoh kod pengendali:
fungsi MachName: tali;
var
p: integer;
dengan: PChar;
bermula
c: = stralloc (p);
akhir;
akhir.
Langkah 6
Pasang komponen ke dalam projek yang anda perlukan. Dari menu utama Delphi, pilih Komponen, Pasang Komponen. Dalam kotak dialog yang muncul, buka salah satu tab: Ke Pakej yang ada, jika anda ingin memasang komponen ke dalam pakej yang ada, atau Ke Pakej baru - ke dalam yang baru. Klik OK dan sahkan permintaan aplikasi untuk menimpa pakej (jika perlu). Selepas itu, komponen bertulis akan siap digunakan.
