Mengenal Komponen TEdit Delphi

TEdit atau seringkali disebut sebagai Edit dalam Delphi digunakan untuk membuat suatu komponen input, namun komponen edit ini juga dapat digunakan sebagai komponen output. Komponen TEdit dapat ditemukan di tab standard pada component pallete Delphi 

Gambar 1. Komponen edit

Terdapat beberapa event yang sering digunakan pada komponen ini antara lain :

a.    Event OnChange à Event ini akan berjalan ketika kompoonen ini diubah isinya.

b.    Event OnKeyPress à Event ini akan berjalan ketika ada suatu tombol keyboard ditekan, dalam artian satu tombol (single press)

c.    Event OnKeyDown à event ini akan berjalan ketika suatu tombol kunci ditekan. Mirip dengan on key press hanya saja event ini dapat menangkap kunci gabungan.

d.    Event OnKeyUp à event ini akan berjalan ketika tombol keyboard dilepaskan. Biasanya tombol yang digunakan merupakan tombol kunci

Untuk memahami penggunaan komponen ini anda dapat mengikuti tutorial ini :

1.    Buatlah aplikasi baru dari menu “File – New - Application”

Gambar 2. Pembuatan Aplikasi Baru

Dengan demikian maka dellphi akan membuka jendela form kosong dan jendela unit code.

Gambar 3. Form Baru

2.    Tambahkan komponen edit ke dalam form dengan ketentuan seperti berikut :

Komponen	Atribut
TEdit	Name             : edt1 Text                 : ‘ini adalah contoh penggunaan komponen edit’
TEdit	Name             : edt2 Text                 : (kosong)
TEdit	Name             : edt3 Text                 : (kosong)
TEdit	Name             : edt4 Text                 : (kosong)

3.    Lakukan double click pada komponen edt2 kemudian tambahkan kode berikut

procedure TForm1.edt2Change(Sender: TObject);

begin

  //penggunaan komponen edit event onchange

  edt3.Text := edt2.Text;

end;

4.    Pilih komponen edt4 kemudian pada object inspector tab event double click pada OnKeyPress.

Gambar 4. Tab event

5.    Tambahkan kode berikut

procedure TForm1.edt4KeyPress(Sender: TObject; var Key: Char);

begin

  if (Key = Chr(13)) then begin

    edt4.Text := edt1.Text;

  end;

end;

6.    Jalankan aplikasi dengan klik menu “Run - Run” atau menekan tombol F9. Jika anda berhasil maka anda akan mendapatkan tampilan seperti berikut :

Gambar 5. Hasil running

Cobalah menulis pada edt2 dan cobalah pula untuk menekan tombol enter(return) pada edt4.

Sekian penjelasan tentang komponen TEdit Delphi semoga bermanfaat.

baca juga :
mengenal komponen TLabel Delphi
memahami kamus data dalam perancangan sistem
pengertian diagram arus data (DAD)

• Tweet
• Share
• Share
• Share
• Share

Sign up here with your email