請問一下,若我想做個小程試,讓 keyboard 的某鍵一直重覆點 例如：１鍵一直重覆點 應該要怎麼做呢？（不在程式Form 範圍內，也能自動點） 先前我看過了站長的文章.. ----------------------------------------------------- 對Form1觸發Tab按鍵按下事件: PostMessage(form1.Handle, WM_KEYDOWN, VK_TAB, 0); 對Edit1觸發Enter按鍵按下事件: PostMessage(edit1.Handle, WM_KEYDOWN, VK_RETURN, 0); ----------------------------------------------------- 這可以用在Form 以外的範圍嗎？ 還有..keybd_event() <--的用法如何..可以大略說一下嗎？ 新手上路..謝謝...^^

不在程式Form 範圍內，也能自動點 是指同一個AP, 不同之form, 還是指控制其他的程式 1. 若在同一Delphi程式內,以下Demo, 由form2之button1, 重複在form1之edit1上按'a' (其實若是要寫入text, 還有其他很多方法,keydown並不好) [code] procedure TForm2.Button1Click(Sender: TObject); var i:integer; begin for i:=1 to 5 do PostMessage(form1.edit1.Handle, WM_KEYDOWN, 65, 0); end; [/blue] 2. 若要控制其他程式, 則必須模擬鍵盤動作, 每按一個鍵其實是經過了WM_KEYDOWN->WM_CHAR(系統將按鍵解釋)->WM_KEYUP等過程,PostMessage, keybd_event()均可達成, 實例可參考 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=21387