Sahabat Delphi, tanpa basa basi lagi saya akan membahas tentang bagaiamana cara mencari keycode pada delphi maka perhatikan dan simaklah beberapa tips dan trik di bawah ini supaya paham. Oke Langsung saja,
1. Buka IDE Delphi
2. Kemudian buat 2 buah label seperti gambar di bawah ini :
4. berikan code di bawah ini pada form keydown dan contoh code nya seperti di bawah ini :
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Label1.Caption:= IntToStr(Key);
end;
5. Simpan project dengan cara file save project as
6. Kemudian Compile
7. Coba dengan mengetik angka pada keyboard laptop atau komputer agan , semisal ketik angka 1 maka angka muncul angka 49, ketika angka 2 maka akan muncul 50, ketik angka 3 maka akan muncul angka 51 dan seterusnya.
8. Sekian dan terima kasih
SALAM DELPHI
0 comments:
Post a Comment