现连接了密码键盘,当在大键盘上按下 "Ctrl"和"+"的组合键,密码键盘会提示 “请输入密码”
问题是我怎么在delphi 里模拟输入 "Ctrl"和"+"的组合键,
也就是说,在Delphi里需要输入密码界面显示的同时,提示“请输入密码”(不再按大键盘上的"Ctrl"和"+"的组合键就提示)我用以下方法测试,但是不提示!
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),0,0);
keybd_event(VK_ADD,MapVirtualKey(VK_ADD,0),0 ,0 );
keybd_event(VK_ADD,MapVirtualKey(VK_ADD, 0),KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);请高手帮忙解决
问题是我怎么在delphi 里模拟输入 "Ctrl"和"+"的组合键,
也就是说,在Delphi里需要输入密码界面显示的同时,提示“请输入密码”(不再按大键盘上的"Ctrl"和"+"的组合键就提示)我用以下方法测试,但是不提示!
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),0,0);
keybd_event(VK_ADD,MapVirtualKey(VK_ADD,0),0 ,0 );
keybd_event(VK_ADD,MapVirtualKey(VK_ADD, 0),KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);请高手帮忙解决
解决方案 »
- delphi 字符串 截取的疑难问题,,麻烦大帮帮忙????????????
- Navbar 1.2 for D6 的密码!
- 在idtcpserver如何取得所连接的客户端的IP地址?
- 我要搜索樹第2層的TEXT,請問第2層的節點如何表示
- 看了Demos中的ado例子,有些代码不懂
- 物归原主,散分5000,一天后结贴,no.7
- 为什么我的程序连续编译几次就死机?
- 没有数据源 Quick Report 不能打印多页么?没有 Band 就打不出内容?!
- 菜鸟问:报表~!!QRrichtext 导出 RTF 解决者:“50大洋”围观者1个大洋~!
- 如何在win2000下彻底的关闭计算机,包括关闭ATX电源
- 这段代码是定义啥?请指教
- Delphi 窗体递归重复调用问题
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0);
keybd_event(ord('+'), MapVirtualKey(ord('+'), 0), 0, 0);
keybd_event(ord('+'), MapVirtualKey(ord('+'), 0), KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0);因为一个是43,一个是107(小键盘)
然后setfocus让edit得到焦点。
最后
keybd_event(VK_CONTROL, (BYTE)0, 0 ,0);
keybd_event(VK_ADD,(BYTE)0, 0 ,0);
keybd_event(VK_ADD, (BYTE)0, KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL, (BYTE)0, KEYEVENTF_KEYUP,0);
你测试下行不行