Mengenal Events dalam Pemrograman Delphi7

Mengenal Events dalam Pemrograman Delphi7 - Events merupakan kejadian-kejadian yang didapat terjadi pada sebuah objek atau komponen di delphi7. Jumlah dan macam-macam Event tergantung dari masing-masing objek. Misalnya pada objek TEdit atau sering disebut dengan Edit. Objek ini memiliki banyak event. Beberapa event yang dimiliki objek ini yaitu : OnChange, OnClick, OnDblClick, OnEnter, OnExit, OnKeyUp, OnKeyPress dan masih banyak lagi ..

Lalu, bagaimana cara melihat events-events yang dimiliki oleh suatu objek? Mungkin temen-temen bertanya seperti itu. Pertama, klik / aktifkan objek yang ingin dilihat eventnya. Kemudian pada Object Inspector, dari tab Properties, pindah ke tab Events. Nah, disana akan terlihat events-events tersebut.

Gambar 1. Events-events pada objek Edit

Untuk lebih memahami bagaimana events ini, mari kita buat satu buah contoh sederhana. Dalam contoh ini kita akan membuat sebuah events OnClick pada objek Button. 
1. Buka program delphi kemudian buat project baru dan satu buah form kosong.
2. Tambahkan 1 buah TEdit dan 1 buah TButton. Ubah properti masing-masing objek seperti berikut :

Objek/Komponen	Properties
TEdit	Name : txtNama Text : kosongkan
TButton	Name : cmdTombol Caption : Tampilkan

3. Desainlah seperti tampilan berikut : (atau sesuai selera teman deh)

Gambar 2. Desain tampilan form

Kemudian doble klik pada tombol txtTombol. maka akan masuk ke lembar code. kemudian ketikkan listing berikut :

procedure TForm1.cmdTombolClick(Sender: TObject);
begin
  // tampilkan teks yang diinput melalui messageBox
  ShowMessage(txtNama.Text);
end;

Listing diatas akan menampilkan kotak pesan yang berisi inputan yang dimasukkan melalui editText.
Untuk mengambil inputan yang ada pada objek TEdit, kita bisa menggunakan dengan memanggil atribut Text pada objek tersebut txtNama.Text.

Keterangan :
- cmdTombolClick() 
artinya ketika terjadi klik pada objek cmdTombol maka code-code yang ada di antara begin dan end; akan dikerjakan.
-   // tampilkan teks yang diinput melalui messageBox 
ini merupakan komentar atau penjelas saja. ini tidak akan di eksekusi sebagai sebuah code. maka - compiler akan mengabaikannya. selain dengan tanda //, bisa juga dengan menggunakan tanda {--isi komentar--}
- ShowMessage('pesan yang ingin ditampilkan'); 
ini fungsi untuk menampilkan kotak pesan.

Gambar 3. Hasil program

Sekarang coba jalankan / run project dan isikan sembarang teks melalui editText tersebut, kemudian tekan tombol "Tampilkan". Silakan amati hasilnya dan coba dengan events-events yang lainnya.
Happy Coding .. :p

incoming search :
aplikasi delphi7
tutorial delphi7
panduan belajar delphi7
delphi7 pemula
project delphi7
aplikasi penjualan dengan delphi7

Title: Mengenal Events dalam Pemrograman Delphi7
Posted by:Admin
Published :2013-12-25T04:27:00-08:00
Rating: 4.5
Reviewer: 7 Reviews
Mengenal Events dalam Pemrograman Delphi7