1樓：匿名使用者
新增時間控制元件:timer1
,edit1,label1,
button1,button2
vars,c:integer;//s為間隔秒數,c為執行次數
...procedure tform1.timer1timer(sender: tobject);
begin
s:=s-1;
if s=0 then
begin
c:=c+1;
label1.caption:='已執行次數:'+inttostr(c);//顯示執行次數
s:=strtoint(edit1.text);//edit1.text設定的間隔秒數
end;
end;
procedure tform1.button1click(sender: tobject);//開始執行
begin
timer1.enabled:=true;
s:=strtoint(edit1.text);//如:edit1.text填寫5(秒)
end;
procedure tform1.button2click(sender: tobject);//停止執行
begin
timer1.enabled:=false;
end;
2樓：匿名使用者
可以直接呼叫bat檔案 呵呵 一個思路
3樓：匿名使用者
可以用 timer 控制元件
4樓：百小度
可以使用timer控制元件：
timer的enabled屬性為開啟關閉timer，當enabled:=true時開啟；enabled:=false時關閉。
timer的interval屬性為2事件發生的間隔，單位為毫秒。
timer的ontimer事件即可寫你所想實現操作的**。
家庭電路出問題的！懂的進
是你的熱水袋短路了 首先樓主說開關沒有調 樓主在好好檢查按一下實驗開關可否跳脫 用測點筆試試 如果不跳匝測電筆也沒反應，就證明上樓的這趟迴路沒有電 就更不談燒掉用電器之說 首先樓主找到二樓電源供電的上級電源開關 是否調匝 如果一樓與二樓共用一個總開關 一樓有電二樓沒電 那就要檢測一樓到二樓的電源線是...
中國籃球等等的問題,懂的進
像體操，跳水，舉重.可以通過時間來磨練，並且他們沒有廣泛的群眾基礎。而籃球，足球更重要的是看臨場發揮。上次跟西班牙真可謂是惜敗呀，除了老尤的指揮有點不妥，我看更重要的就是我們的體力問題了。據說，大姚賽後連走路都走不動呢！還有，就是，籃球，足球，中國的起跑也是比別人慢很多的。我想，現在這些專案都是在成...
合同法的問題，懂的進，謝謝
這種屬於轉租的情況。你跟乙的合同必須得到出租人，即甲的確認才能有效，否則是無效的轉租。若轉租合同無效，你可以向乙主張違約責任，請求返還轉租費17000元，但是應當向其支付必要的費用。如果原租賃合同到期，不管你的轉租合同是否有效，房東都有權利不再出租他的房屋，跟你起訴與否沒有關係。至於你跟乙的糾紛，也...