密码键盘,当我在键盘上按下 "Ctrl"和“+”的组合键 密码键盘提示“请输入密码”,同时密码键盘就可以输入密码。
当我在程序按钮中的onclike时间中,模拟大键盘的输入"Ctrl"和“+”的组合键,如下:
begin
  keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),0,0);
  keybd_event(VK_ADD,MapVirtualKey(VK_ADD,0),0 ,0 );     
  keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);
  keybd_event(VK_ADD,MapVirtualKey(VK_ADD, 0),KEYEVENTF_KEYUP,0); 
end;
为什么密码键盘不提示 “请输入密码”,而密码键盘也不能输入密码,请兄弟们帮忙!! 

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    keybd_event(VK_CONTROL, 0, 0, 0);
        Sleep(10);
        keybd_event(VK_OEM_PLUS, 0, 0, 0);
        Sleep(10);
        keybd_event(VK_OEM_PLUS, 0, KEYEVENTF_KEYUP, 0);
        Sleep(10);
        keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
        Sleep(10);
        showmessage('请输入密码');
    end;
    是这样吗?
      

  2.   

    VK_OEM_PLUS才是大键盘"+"号的虚拟键码
      

  3.   

    VK_OEM_PLUS直接输出是等号,不是加号……