Skip to content Skip to sidebar Skip to footer
Home / Input Angka Pada Komponen Edit di Delphi 7

Input Angka Pada Komponen Edit di Delphi 7

By Hendi Post a Comment

Selanjutnya saya akan berbagi bagaimana cara input hanya berupa angka pada komponen edit di Delphi 7. Dengan cara ini kita dapat mengatur pengisian input edit text hanya bisa diisi dengan angka saja. Biasanya digunakan untuk memasukkan nilai yang berhubungan dengan harga atau jumlah, agar tidak terjadi kesalahan pada perhitungannya. Baiklah tak perlu panjang lebar langsung saja kita ke TKP.
Pilih komponen Edit yang akan diatur untuk inputan hanya berupa angka kemudian perhatikan Object Inspector pada tab Event Pilih OnKeyPress klik 2 kali kemudian akan masuk ke kode editor kemudian ketikan scriptnya berikut ini :
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'...'9',#8]) then 
   key := #0;
end; 
Selamat mencoba...

Related Post:


Post a Comment for "Input Angka Pada Komponen Edit di Delphi 7 "