如模拟按下Ctrl键:
keybd_event(VK_RCONTROL, 0, 0, 0);
keybd_event(VK_RCONTROL, 0, KEYEVENTF_KEYUP, 0);但是Alt键系统键,好象不是这么做的???
keybd_event(VK_RCONTROL, 0, 0, 0);
keybd_event(VK_RCONTROL, 0, KEYEVENTF_KEYUP, 0);但是Alt键系统键,好象不是这么做的???
procedure TForm1.Button1Click(Sender: TObject);
begin
// Alt
keybd_event(VK_MENU, 0, 0, 0);
keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP, 0);
// Down
keybd_event(VK_DOWN, 0, 0, 0);
keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0);
end;
keybd_event(18, 0, 0, 0);
keybd_event(18, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP, 0);