Membuat
Shortcut menggunakan
OnShortCut pada tab
Event di
Project Inspector
- Buat 2 buah form, Form1 dan Form2
- Masih di Form1, Pada Object Inspector>>Tab Event>>OnShortCut>>Klik 2X
- Isikan code berikut taruh diantara atau ditengah-tengah bagin dan end;
if (Msg.CharCode = Ord('D')) and (HiWord(Msg.KeyData) and KF_ALTDOWN <> 0) and
(GetKeyState(VK_CONTROL) < 0) then
begin
Form2.show;
handled:= true;
end;
end;
note : shortcut ini hanya berfungsi pada (Ctrl+Alt+Masukan Keynya yang warna hijau), Contoh jika kita memasukan "A" pada text yang berwarna hijau maka Shortcutnya berubah menjadi Ctrl+Alt+A
- Jika ingin menambahkan Seperti coding Close tinggal tambahkan coding yang sama di bawah
if (Msg.CharCode = Ord('D')) and (HiWord(Msg.KeyData) and KF_ALTDOWN <> 0) and
(GetKeyState(VK_CONTROL) < 0) then
begin
Form2.Show;
handled:=true;
end;
if (Msg.CharCode = Ord('Q')) and (HiWord(Msg.KeyData) and KF_ALTDOWN <> 0) and
(GetKeyState(VK_CONTROL) < 0) then
begin
Form1.close;
handled:=true;
end;
end;
- Jika sudah coba jalankan Program dengan menekan F9
Membuat
Shortcut menggunnakan
ActionList
- Gunakan komponen Actionlist yang ada pada tab Standard dan taruh di form
- Klik 2X pada Actionlist jika ada muncul jendela peringatan Editing Form1.actlst1 pilih New Action
- Mucul lagi jendela peringatan Edit Component's Name langsung OK saja
- Buat 2 buah Actionlist, act1 dan act2. Pada Object Inspector>>SecondaryShortcut>>Klik2X
- Isikan Ctrl+Q (bisa terserah) pada jendela String List Editor. Setelah itu OK
- Klik 2X pada act1 masukan diantara atau ditengah-ditengah begin dan end;
Form1.close;
- Lakukan juga langkah ini pada act2 namun pada String List Editor nya isikan Ctrl+2 (bisa terserah), Kenapa jadi Ctrl+2 karena kita akan menggunakan atau memunculkan form2
- Klik2X pada act2 masukan coding berikut diantara atau ditengah-tengah begin dan end;
Form2.showmodal;
- Jika sudah jalankan Program kalian dengan menekan F9 dan coba shortcutnya
- Jika ingin menambahkan shortcut pada form2 tinggal masukan Actionlistnya kedalam form2 lalu lakukan langkah yang sama di atas kedalam form2
note : Sebenarnya pada bagian coding kenapa selalu memakai show dan close saja sebenarnya bisa mungkin karena disini pada dasarnya hanya menyediakan bagaimana cara menggunakan dan menjalankanya, Lebih dari ini mungkin kalian harus bisa menggunakan logika kalian masing-masing.
Kelebihan antara menggunakan Actionlist dibandingkan menggunakan OnShrortCut adalah
Pada Actionlist Shortcut yang digunakan bisa bebas sesuai keinginan kita sebaliknya dengan OnShortCut yang harus menggunakan Ctrl+Alt
Kekuaranganya adalah
Pada Actionlist maupun OnShortCut jika kita menggunakan coding "close" pada form1 maka semua form akan tertutup atau aplikasi akan tertutup semua termasuk form2 form3 dst. Maka dari itu disini saya menggunakan "showmodal" ketimbang "show" saja. Ketika menggunakan Show ketika menjalankan program pada waktu menampilka form2 kita masih bisa menswitch ke form1 tetapi sebaliknya jika kita menggunakan showmodal maka kita tidak bisa menswitch ke form1
JIKA INGIN COPAS CANTUMKAN SUMBERNYA
KURANG JELAS BISA DITANYAKAN
selamat mencoba.....
Related Posts