Cara Validasi Karakter Tertentu pada Delphi 7

Hai Bangsawan Tua ..... Validasi memang penting untuk sebuah pembuatan program karena jika program tidak diberikan validasi akan terjadi kesalahan – kesalahan dan tidak sesuai dengan keinginan

Baca juga : Berbagai Macam Validasi Dephi dan Visual Basic

Sekarang saya akan memberikan sebuah validasi yang berfungsi untuk melindungi program dari karakter – karakter tertentu. Contohnya kita membuat sebuah form, yang form tersebut terdapat komponen Edit Nama, isi dari edit nama hanya hanya huruf besar dan kecil maka edit nama hanya boleh diisikan oleh huruf saja.

Untuk memvalidasi Komponen Edit scriptnya sebagai berikut :     

if ( ( (key >= 'A') and (key <= 'Z') )      huruf kapital A hingga Z 

    or ( (key >= 'a') and (key <= 'z') )      huruf kecil a hingga 
    or ( (key >= '0') and (key <= '9') )      angka 0 hingga 9
    or (key='.') or (key=' ')                      simbol . dan spasi
    or (key='/') or (key=',') or (key='-')    simbol /  ,  -
    or (key=#8) )                                    backspace
    then

  else
    key := #0;

Untuk menambah karakter yang lain dapat menyisipkannya diantara OR dan untuk menyisipkan script diatas dapat mem - paste di komponen Edit dengan cara meng - klik 2x komponen edit tersebut.

Validasi ini sangat penting digunakan untuk aplikasi perkantoran, validasi karakter tidak boleh masuk membuat kesalahan program semakin kecil dan semakin sempurna.

Semoga artikel diatas dapat membantu anda. Dan jangan lupa baca juga Memberikan Validasi Tidak Boleh Kosong pada Delphi 7