怎么模拟键盘向系统发alt+A这样的组合键,150分给你们。(150分)

  • 主题发起人 主题发起人 nzinzi
  • 开始时间 开始时间
N

nzinzi

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么模拟键盘象系统发alt+A这样的组合键,150分给你们。
 
麻烦提问前搜索一下,这个答案我都不知道贴了多少遍了:)

procedure AltA;
begin
keybd_event(VK_Menu, MapVirtualKey(VK_Menu, 0), 0, 0);
keybd_event(ord('A'), MapVirtualKey(ord('A'), 0), 0, 0);
keybd_event(ord('A'), MapVirtualKey(ord('A'), 0), KEYEVENTF_KEYUP, 0);
keybd_event(VK_Menu, MapVirtualKey(VK_Menu, 0), KEYEVENTF_KEYUP, 0);
end;

 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部