Membatasi Karakter Pada TEdit Delphi

Kali ini hanya tutorial delphi singkat mengenai bagaimana membatasi karakter yang ada pada komponen edit delphi.Nah,kadang-kadang pada aplikasi yang kita buat kita harus membatasi karakter yang bisa dimasukkan misalnya pada edit yang isinya tahun lahir tentu tidak mungkin kita mengisinya dengan huruf bukan ? Tentu saja harus dengan angka dan juga pada tahun hanya dibatasi 4 digit seperti 2000, 2010 dll.Nah,kali ini saya akan menjelaskan caranya membatasi inputan karakter itu.Langsung saja yah

1) Membatasi Karakter Yang Bisa Di Masukkan

Kalau kita ingin karakter yang bisa dimasukkan dalam TEdit hanya angka kita bisa menggunakan event onKeyPress pada TEdit dan masukkan kode berikut


if not (key in ['0'..'9', #8, #13]) then key :=#0;
Catatan :yang pagar terus angka itu adalah kode ascii setiap tombol dikeyboard memiliki kodenya sendiri-sendiri kalau untuk daftar lengkap kodenya bisa anda baca di bawah ini

Daftar Kode ASCII Keyboard Lengkap

Kalau anda mau karakter yang bisa dimasukkan hanya huruf maka kita tinggal mengganti kodenya menjadi


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

Yang angka 0 dan 9 itu tinggal kita ganti A dan Z saja mudah kan ?

2) Membatasi Panjang Karakter

Kalau untuk panjang karakter kita bisa mengatur pada object inspector edit itu sendiri tinggal kita cari MaxLength lalu isi dengan panjang karakter maksimal yang diperbolehkan

Mungkin itu dulu postingan tentang membatasi karakter pada delphi semoga bisa membantu kalian yang masih belajar tentang delphi..