Input Angka / Huruf Saja - Delphi

Input Angka / Huruf Saja - Delphi

  Desember 11, 2018    Adi Purnata

---

Bicara masalah programming memang tidak ada habisnya ya ...!!!

tutorial kali ini saya akan membahas mengenai bagaimana caranya agar inputan hanya bisa angka saja atau sebaliknya hanya untuk huruf saja.

pada sebuah aplikasi validasi ini sangat diperlukan untuk menghindari inputan yang salah dari user (user/human error) contoh sederhanya seperti ini :
pada aplikasi formulir digital ada beberapa kolom isian yang seharusnya diisi dengan nilai numeric saja, misalnya kolom nomor telepon, jika aplikasi tidak memiliki validasi seperti ini, maka kolom nomor telepon yang diisi dengan huruf akan tersimpan pada database, sehingga proses simpan ke database akan memberikan informasi kesalahan.

okey...kita lanjut ke topi bahasan.

langkah awal yang dilakukan untuk membuat inputan angka atau huruf saja adalah :

1. Siapkan form dengan komponen seperti gambar dibawah :

 

form diatas menggunakan 2 komponen Label dan 2 komponen Edit

2. Setelah itu kita buat source codenya pada komponen Tedit yang khusus untuk inputan angka saja,
seleksi atau sorot komponen Tedit1 dan pilih event pada object inspector dan double klik event OnKeyPress

dan sisipkan kode seperti ini :

if not (key in['0'..'9',#8,#13,#32]) then

 begin

   key:=#0;

   showmessage('inputan hanya angka bro');

 end;

dengan cara yang sama pada komponen Tedit yang khusus untuk inputan huruf saja, kita sisipkan kode seperti dibawah ini pada event OnKeyPress

if not (key in['a'..'z','A'..'Z',#8,#13,#32]) then

 begin

   key:=#0;

   showmessage('inputan hanya huruf bro');

 end;

Sehingga ketika program dijalankan, hasilnya akan seperti gambar dibawah :

nah ngerti kan maksudnya apa ?

jadi kode yang kita sisipkan pada event OnKeyPress tadi fungsinya adalah untuk menghandel ketika ada inputan masuk sesuai statement if diatas maka pesan error tidak akan keluar, begitu juga sebaliknya.



Sedikit penjelasan,

#8 adalah kode ascii dari tombol BackSapce(hapus)
#32 adalah kode ascii dari tombol Space(spasi)
#13 adalah kode ascii dari tombol Enter
jadi meskipun cuma bisa menerima input huruf/angka saja, tapi tombol diatas juga diperlukan

sekian tutorial kali ini, terimakasih atas waktunya sudah mau membaca artikel ini dari atas.

semoga tutorial ini bermanfaat

salam idea