Delphi模拟win+tab按键效果

2021-03-08 04:29

阅读:326

标签:cli   img   one   integer   code   eve   按键   for   int   

//按下左侧win键

keybd_event(VK_LWIN,0,0,0);

//按下tab键

keybd_event(VK_TAB,0,0,0);

//抬起左侧win键

keybd_event(VK_LWIN,0,KEYEVENTF_KEYUP,0);

//抬起tab键

keybd_event(VK_TAB,0,KEYEVENTF_KEYUP,0);

 

技术图片技术图片
var
  i: Integer;
begin
 keybd_event(VK_LWIN,0,0,0);    //按下一次win键即可
  for i := 0 to 150 do begin
  keybd_event(VK_TAB,0,0,0);//tab按键按下
  keybd_event(VK_TAB,0,KEYEVENTF_KEYUP,0);//tab按键抬起
  end;
 keybd_event(VK_LWIN,0,KEYEVENTF_KEYUP,0);//记得释放按下的win键
end;
View Code

 

Delphi模拟win+tab按键效果

标签:cli   img   one   integer   code   eve   按键   for   int   

原文地址:https://www.cnblogs.com/Coder-MIFir/p/12803502.html


评论


亲,登录后才可以留言!