热键疑问...

ahan1232000

请问各位电脑高手,有什么软件能够以下功能...

如:
按ctrl+shift+a =apple
ctrl+shift+b   =ball
意思就是说以上的热键都储存好,只要按ctrl+shift+xx就能出现我要的字母
就象ctrl+C , ctrl+V一样的意思.

hcong85

原帖由 ahan1232000 于 13-3-2007 05:46 PM 发表
请问各位电脑高手,有什么软件能够以下功能...

如:
按ctrl+shift+a =apple
ctrl+shift+b   =ball
意思就是说以上的热键都储存好,只要按ctrl+shift+xx就能出现我要的字母
就象ctrl+C , ctrl+V一样的意思.

自己写一个吧,这样的软件很容易写吧了

ahan1232000

原帖由 hcong85 于 13-3-2007 06:23 PM 发表


自己写一个吧,这样的软件很容易写吧了

对不起我是电脑白痴
你能帮助我吗?

tensaix2j

试试看在user32.dll里的SetWindowsHookEx

WishesComeTrue

用 vbSendKeys, 或是一些 VB API 都能够做到

hcong85

基本上只需要用GetAsyncKeyState和VB的SendKeys

如果不是用VB就用SendInput或keybd_event

ahan1232000

试试看在user32.dll里的SetWindowsHookEx

用 vbSendKeys, 或是一些 VB API 都能够做到

基本上只需要用GetAsyncKeyState和VB的SendKeys

如果不是用VB就用SendInput或keybd_event

基本上只需要用GetAsyncKeyState和VB的SendKeys

如果不是用VB就用SendInput或keybd_event

谢谢大家!我去研究看看..如有什么不明白的再问大家...

tensaix2j

原帖由 hcong85 于 14-3-2007 06:24 PM 发表
基本上只需要用GetAsyncKeyState和VB的SendKeys

如果不是用VB就用SendInput或keybd_event

借用楼主的贴。。
对不起，我没用过vbsendkey 还有getasync..可以解释一下吗。。
请问若你那个vb application 在background,而你的其它application在foreground（比如notepad)...然后你能够用你设计的hotkey 用在那个其它的application 吗？ 因为若是notepad在foreground.. 你按hotkey就是在notepad发生，它会怎么样去trigger在vb 的function？不明。。

因为据我了解是必须把某function 挂在某hotkey,即使，那个vb在background, 你开notepad在foreground,在notepad按你设计的hotkey, 他也会跑去执行那个挂在hotkey的function..然后才vb叫sendkey 来control notepad,比如在notepad写＂apple＂的东东。。 （我不是说在vb按hotkey,然后在notepad写＂apple＂，而是在notepad 按。。）

hcong85

写个例子给你吧

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/WindowsUserInterface/UserInput/VirtualKeyCodes.asp

1. Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
   
2. Private Const VK_LSHIFT = &HA0
   
3. Private Const VK_RSHIFT = &HA1
   
4. Private Const VK_A = &H41
   
5. Private Const VK_B = &H42
   
6. 
   
7. Private Sub Timer1_Timer()
   
8. If GetAsyncKeyState(VK_LSHIFT) = -32768 Or GetAsyncKeyState(VK_RSHIFT) = -32768 Then
   
9.     If GetAsyncKeyState(VK_A) = -32767 Then
   
10.         SendKeys "Apple"
    
11.     ElseIf GetAsyncKeyState(VK_B) = -32767 Then
    
12.         SendKeys "Ball"
    
13.     End If
    
14. End If
    
15. End Sub

复制代码

tensaix2j

原来是用timer不停的getasynckey..
有没有更好的方法？

fxam

原帖由 tensaix2j 于 2007/3/18 03:10 PM 发表
原来是用timer不停的getasynckey..
有没有更好的方法？

SetWindowsHookEx / RegisterHotKey