//循環(huán)按1 到6 F1到F8?
procedure TForm1.Timer1Timer(Sender: TObject);
var
??wmHwnd:HWND;
??i:integer;
begin
????wmHwnd:=FindWindow(nil,'Element Client');
????for i := 49 to 54 do //鍵1到1鍵6
????begin
??????SendMessage(wmHwnd,WM_KEYDOWN,i,0);
??????SendMessage(wmHwnd,wm_keyup,i,0);
????end;
????for i := 112 to 119 do //鍵F1 到鍵F8
????begin
??????SendMessage(wmHwnd,WM_KEYDOWN,i,0);
??????SendMessage(wmHwnd,wm_keyup,i,0);
????end;
end;

通過 Wiz 發(fā)布

轉(zhuǎn)載于:https://www.cnblogs.com/xe2011/archive/2012/06/03/2532896.html

總結(jié)

以上是生活随笔為你收集整理的SendMessage 循环按1 到6 F1到F8_2的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。