komponen inputan daCara agar inputan data pada komponen edit hanya dapat berupa angka dan atau berupa karakter huruf saja......

berikut ini adalah source code agar inputan data pada komponen edit hanya dapat berupa angka dan atau berupa karakter huruf saja......

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ['0'..'9','A'..'Z','a'..'z']) then
Key:=#0;
end;

tanda baca semisal titik, koma, garis miring dsb tidak akan bisa dijadikan inputan pada komponen edit

sumber : http://www.facebook.com/groups/delphi.interbase/
oleh  : http://www.facebook.com/imam.chalimi  KUNJUNGI WEBSITE DAGANGAN KAMI KLIK PADA TEKS BERKEDIP INI