Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Kłopoty z funkcją keyb_event...
Viper87



Typ: neutral
Postów: 490
Zarejestrowany: Oct 2002
Kłopoty z funkcją keyb_event...

Pomocy! Potrzebuję, żeby ktoś zamienił mi funkcję keyb_event w taki sposób, aby gasiła klawisz Capslock! Wiem, że jej drugie wywołanie to właśnie spowoduje, ale mój program wykonuje polecenia jedno po drugim i wtedy polecenia się "gubią", szczególnie gdy wsadzę to do jakiegoś SUB, żeby nie powtarzać kodu. Czy ktoś mógłby mi pomóc?

Oto deklaracja:

Private Declare Sub keybd_event Lib "user32" _
        (ByVal bVk As Byte, _
          ByVal bScan As Byte, _
          ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const VK_NUMLOCK = &H90
      Const VK_SCROLL = &H91
      Const VK_CAPITAL = &H14
      Const KEYEVENTF_EXTENDEDKEY = &H1
      Const KEYEVENTF_KEYUP = &H2

' i potem np w Form_load:

keybd_event VK_CAPITAL, &H45, KEYEVENTF_EXTENDEDKEY Or 0, 0
        keybd_event VK_CAPITAL, &H45, KEYEVENTF_EXTENDEDKEY _
            Or KEYEVENTF_KEYUP, 0


_____________________________________________
Viper

"Savoir c`est prevoir, prevoir c`est prevenir". 
(Wiedzieć to przewidzieć, przewidzieć to zapobiegać) 


04-03-2004 19:21
Pokaż profil Viper87  Wyślij email do Viper87   Odwiedź stronę Viper87  
bisiek




Typ: neutral
Postów: 487
Zarejestrowany: Jul 2003

Spróbuj robić przerwy w działaniu programu (sleep) jeżeli to nie przeszkadza


_____________________________________________
www.mob.abc.pl - moja strona o VB

04-03-2004 19:58
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1