Prosedur adalah suatu program terpisah dan berdiri dalam suatu blok program dan befungsi sebagai sebuah sub program (program bagian). Penulisan prosedur diawali dengan kata Procedure pada bagian deklarasi program dan cukup menuliskan nama prosedur yang dibuat pada bagian Implementasi.
Alasan penggunaan prosedur :
1. Digunakan untuk penggalan program yang akan digunakan secara berulang – ulang dalam suatu proses program.
2. Digunakan untuk memecah – mecah program menjadi sebuah modul program, sehingga listing program menjadi lebih sederhana.
Syarat penulisan nama procedure :
1. Harus diawali dengan karakter.
2. Untuk nama prosedur dengan menggunakan dua kata atau lebih penulisannya tidak boleh menggunakan spasi, harus digabung atau dihubungkan dengan underscore ( _ )
3. Tidak mengenal tanda baca.
Contoh :
1. Pendeklarasian Prosedur
Penulisan pendeklarian sebuah prosedur dalam Delphi ditempatkan setelah kata public agar dapat dikenali oleh semua object yang ada dalam proses program
tersebut. Penulisannya diawali dengan kata Procedure diikuti nama procedure. Public Procedure bersih;
2. Penulisan prosedur Penulisan pogram prosedur terdapat dalam bagian implementation,
Procedure TForml.Bersih;
Begin
Enama.text := ";
Ealamat.text := ";
Ekota := ";
End;
3. Pemanggilan Prosedur
Pemanggilan prosedur terdapat dalam bagian implementation, pada umumnya pemanggilan prosedur terdapat dalam suatu ruang lingkup object yang mempunyai sebuah event. Cara pemenggilannya cukup hanya dituliskan nama
prosedurnya saja. contoh
Procedure.TForm1.button1click(sender: Tobject);
Begin
Bersih;
End;