Membuat Hotkey Menggunakan Delphi
Agar lebih hemat waktu dalam menggunakan suatu aplikasi memerlukan Hotkey agar meminimalkan penggunaan mouse cara yang akan kita gunakan adalah dengan mengkombinasikan pemakaian 2 tombol misalnya Ctrl+A, Ctrl+B, Ctrl+C dan seterusnya. berikut ini adalah cara membuat Hotkey tersebut.
- Buka aplikasi baru dan siapkan 2 buah form karena disini saya akan membuat hotkey yang akan menghubungkan dari satu form ke form yang lainnya
- Double click OnKeyDown pada halaman event di object inspector
- Setelah itu tulislah listing berikut ini
procedure TFormHotkey.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(ssctrl in shift)and (chr(key)in ['N','n']) then
Form2.showmodal;
end;
4. Jalankan Aplikasi tekan tombol F9 maka akan muncul aplikasi seperti dibawah ini
5. Setelah itu telan tombol Ctrl+n maka Form2 akan muncul seperti ini
Comments