Catatan : Validasi TEdit (Hanya Angka atau Hanya Huruf)

Wiiiii...nyatet lagi...nyatet lagi... 😎

masih membahas komponen TEdit, catatan kali ini membahas mengenai validasi inputan yang dimasukkan kedalam TEdit yang hanya bisa diisi angka saja atau huruf saja.

jadi gini maksudnya validasi...ketika sebuah komponen TEdit yang menggunakan validasi hanya angka, maka inputan selain angka akan dianggap salah, dan tidak dapat ditulis kedalam properti Text komponen tersebut. jika menggunakan huruf, juga akan menganggap salah apabila inputan bukan termasuk huruf.

oke, langsung saja ke contohnya ya... 😉 ow iya sebelumnya, untuk validasi ini kita menggunakan event onKeyPress. 

Contoh Kode Validasi Angka dan Huruf

Oke, saya jelaskan dulu maksud dari kode diatas ...

• Perhatikan function Angka dan function Huruf. Keduanya mempunyai parameter dan nilai balikan yang sama hanya berbeda di kondisi dari isi function tersebut.
• Untuk function Angka, pada perintah if not(Key in ['0'..'9',#8,#13,#32,#27]) then maksudnya adalah jika [Key] inputan bukan merupakan salah satu karakter 0 sampai 9,
  #8 artinya tombol Backspace,
  #13 artinya tombol Enter,
  #32 artinya tombol Spasi,
  #27 artinya tombol Escape / Esc
  maka [Key] inputan akan berisi null atau #0 kemudian muncul pesan dan mengisi value nilai balikan menjadi False
  
  
  *) angka yang ditandai pagar merupakan kode ASCII, untuk melihat Table ASCII bisa dilihat disini 
• Untuk function Huruf hanya berbeda pada ['a'..'z', 'A'..'Z'] ini maksudnya huruf a kecil sampai z kecil, dan huruf A besar sampai Z besar. Pada komputer huruf besar dan huruf kecil dibedakan sendiri-sendiri.
• Terakhir tinggal memanggil function pada masing-masing event OnKeyPress, untuk function Angka digunakan pada komponen Edit2 dan function Huruf pada komponen Edit3. Cara pemanggilannya cukup dengan menuliskan nama_function(value_parameter)
• Untuk pemanggilan pada contoh diatas maksudnya adalah jika kondisi bernilai salah maka abaikan perintah inputan.

Okeyy...dan untuk hasilnya dari kode diatas adalah seperti ini. Silahkan download disini

Siipp...selesai untuk catatan kali ini, sampai jumpa lagi di catatan berikutnya...salam

eeeeeee....ada yang kelewat... 😁 kalo di Delphi yang udah pake VCL Komponen, itu uda ada properti NumbersOnly, tinggal set aja True atau False...hehehe

Oke...kalo ini beneran dah selesai...salaaaaamm