membuat procedure dengan delphi

dalam pembuatan aplikasi dengan baik dengan database ataupun tidak kita sering dihadapi dengan adanya suatu perintah yang sering digunakan, misalnya perintah untuk membersihkan form atau untuk mematikan dan menghidupkan form. agar kita tidak menulis perintah yang sama ada baiknya kita membuat suatu procedure yang dapat kita gunakan pada setiap perintah yang membutuhkan procedure tersebut. baik agar tak terlalu lama sekarang kita akan belajar membuat procedure untuk membersihkan edit teks. berikut langkah-langkahnya.

• buka delphinya

• double klik pada form yang sudah muncul

• ketikan perintah berikut pada bagian deklarasi uses

• procedure bersih // lalu tekan tombol CTRL+SHIFT+C untuk membuat procedure

• setelah procedure dibuat kita tinggal mengetikan apa perintah yang akan diisi pada procedure misalnya sebagai berikut :

procedure bersih( )

 begin

 edit1.Text:='';

 edit2.Text:='';

 ... dst

end;

lalu kita tinggal panggil procedure tersebut dalam setiap kali kita akan menggunakannya, jadi kita tidak perlu menuliskan perintah edit1.TEXT:=''; pada setiap proses pengosongan form, jadi kita bisa lebih menghemat waktu dan pendeknya script program.

semoga artikelnya bermanfaat, please leave a cooment.