線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:650
推到 Plurk!
推到 Facebook!

請問有沒有類似讓程式 reset 的功能?

尚未結案
andy7200
一般會員


發表:6
回覆:6
積分:2
註冊:2004-09-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-10-31 22:35:28 IP:218.166.xxx.xxx 未訂閱
我的code如下,每次如果要重新run該程式都必須要按Button2將整個form視窗關閉之後再重新開啟form,然後在按Button1,這樣很麻煩,請問各位有沒有類似Close()一樣的功能函數可以寫在Button3裡,讓使用者可以按一下Button3做reset動作,之後再按Button1即可. p.s 我試過Timer1->Enabled=false;是沒用的,Timer1雖然停止了可是再按Button1也不會有反應. code: void __fastcall TForm1::Button1Click(TObject *Sender) { Timer1->Enabled=true; } //------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { Close(); } //------------------------------------------------------------------- int t=0; void __fastcall TForm1::Timer1Timer(TObject *Sender) { ediOut->Text=t; t=t 1; if (t==100) Timer1->Enabled=false; } //-------------------------------------------------------------------
geniustom
版主


發表:100
回覆:303
積分:260
註冊:2003-01-03

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-10-31 23:26:21 IP:219.68.xxx.xxx 未訂閱
andy7200您好..您的Timer1看來都沒問題.. 我覺得比較會出問題的是您的t變數..    請把程式改成以下..
in Unit.cpp    ~~~
TForm1 *Form1;
int t=0;  <-------改在這行    void __fastcall TForm1::Button1Click(TObject *Sender)
{
Timer1->Enabled=true;
t=0;  <-----將T歸0..要不然您的T還是100..跑到TIMER的時候當然一次就結束了..
}
Button2Click就不必了..
daniel__lee
高階會員


發表:18
回覆:124
積分:113
註冊:2002-11-10

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-10-31 23:32:44 IP:218.167.xxx.xxx 未訂閱
//再加一個Button3 看看是不是你想要的 void __fastcall TForm1::Button3Click(TObject *Sender) { Timer1->Enabled=false; t=0; ediOut->Text=t; } ~ 勿在浮沙上面築高塔 ~
------
~ 勿在浮沙上面築高塔 ~
系統時間:2024-06-26 22:13:05
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!