Dear rekan2 programmer,
Terima kasih atas tanggapan2 Saudara.
Untuk Bapak Robin, saya belum ngerti... dan sudah saya
coba namun belum berhasil.
Apakah F1, f2, menuCtrlF1 yang Bapak maksud adalah di
top level menu (seperti yang idamkan?) Karena jika
demikian akan merespons hanya jika memang DI-CLICK...
namun tidak merespons walau tombol keyboard F1, F2
DITEKAN.
Terima kasih.
--- Robin Sembiring <[EMAIL PROTECTED]> wrote:
> Coba deklarasikan fungsi ini pada form MDI nya ,,
> jangan di module
>
> Private Declare Function sendmessage Lib "user32"
> Alias "SendMessageA"
> (ByVal hwnd As Long, ByVal wmsg As Long, ByVal
> wparam As Integer, ByVal
> lparam As Long) As Long
>
> Private Sub F1_Click()
> MsgBox "F1"
> End Sub
>
> Private Sub f2_Click()
> MsgBox "F2"
> form2.show
> End Sub
>
> Private Sub menuCtrlF1_Click()
> MsgBox "Ctrl+F1"
> End Sub
>
> Dan saya sudah mencoba pada aplikasi di kantor saya
> ,, dan sudah
> berhasil.. selamat mencoba
>
> :) RS
>
> Makaliwee wrote:
>
> >Yth, rekan2 programmer,
> >
> >Walau sudah zamannya multimedia, tapi kalo
> berhubungan
> >dengan program yang dipakai secara rutin setiap
> hari,
> >akan menjadi sangat merepotkan jika sebagian besar
> >aktivitas menggunakan mouse.
> >
> >Semua program yg saya tulis saya coba memaksimalkan
> >fungsi keyboard saja... namun ada beberapa kendala
> >karena mungkin (secara VB umum) huruf menu yang
> >digarisbawahi (&) hanya bisa aktif dengan kombinasi
> >tombol Alt+... atau Ctrl+...
> >
> >Saya teringat lagi dengan contoh2 program lama yang
> >memaksimalkan fungsi tombol F1, F2, dst.
> >
> >Namun mengapa tombol2 ini TIDAK DAPAT BERFUNGSI
> DENGAN
> >BAIK saat di jendela MDI Form?
> >
> >Contoh:
> >Di menubar VB ada kelompok "File", "Edit", "View",
> >"Project", dst. Saya butuhkan agar waktu saya tekan
> F1
> >maka seperti menu "File" di-klik (BUKANNYA dengan
> >Alt+F).
> >
> >Saya sudah coba menggunakan function API: Function
> >GetAsyncKeyState Lib "user32" yang memonitoring
> event2
> >keyboard dengan bantuan timer juga. Namun untuk MDI
> >form, tidak berguna (spesial dengan satu kali tekan
> F1
> >atau F2 atau F3, dst saja).
> >
> >Mohon pencerahan saudara2.
> >Terima kasih.
__________________________________
Meet your soulmate!
Yahoo! Asia presents Meetic - where millions of singles gather
http://asia.yahoo.com/meetic
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
