該如何清空資料? |
答題得分者是:deity
|
imissyou
一般會員 發表:1 回覆:4 積分:1 註冊:2005-06-17 發送簡訊給我 |
我使用一個按鈕來清空EDIT內的資料
但是RUN完之後
按下按鈕會出現錯誤視窗
接著就沒有回應了...
請教一下各位 該怎麼處理呢?
UNIT如下
//-------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{ Edit1->Text="";
Edit2->Text="";
Edit3->Text="";
Edit4->Text="";
Edit5->Text="";
Edit6->Text="";
Edit7->Text="";
Edit8->Text="";
Edit9->Text="";
Edit10->Text="";
Edit11->Text="";
Edit12->Text="";
Edit13->Text="";
Edit14->Text="";
Edit15->Text="";
}
//-------------------------------------------------------------------
|
RedSnow
版主 發表:79 回覆:1322 積分:845 註冊:2003-12-15 發送簡訊給我 |
|
achigo
一般會員 發表:6 回覆:15 積分:4 註冊:2005-05-28 發送簡訊給我 |
引言: 我使用一個按鈕來清空EDIT內的資料 但是RUN完之後 按下按鈕會出現錯誤視窗 接著就沒有回應了... 請教一下各位 該怎麼處理呢? UNIT如下 //------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { Edit1->Text=""; Edit2->Text=""; Edit3->Text=""; Edit4->Text=""; Edit5->Text=""; Edit6->Text=""; Edit7->Text=""; Edit8->Text=""; Edit9->Text=""; Edit10->Text=""; Edit11->Text=""; Edit12->Text=""; Edit13->Text=""; Edit14->Text=""; Edit15->Text=""; } //-------------------------------------------------------------------請將Edit1->Text=""; 改成這樣的做法 Edit1->Clear(); 專注完美近乎苛求~~
------
專注完美近乎苛求~~ |
deity
尊榮會員 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
imissyou 您好:
将Form的Edit的TEXT清空,还可以采用下面方法,简明扼要!
方法一: void __fastcall TForm1::Button1Click(TObject *Sender) { for(int i=0; i<15; i ) { TEdit* edit=NULL; edit=dynamic_cast试试看 <> ============================ 为什么经过多年以后,得失的过程如此冷漠 ============================ > |
imissyou
一般會員 發表:1 回覆:4 積分:1 註冊:2005-06-17 發送簡訊給我 |
錯誤訊息是windows的錯誤框
標題是:Debugger Exception Notification
內文是:project project1.exe raised exception class EConverError with
message"'is not a valid floating point value'.Process stopped.Use step or Run to continue.
然後C++Builder就整個當掉了...
不知道是我哪裡做錯了..Unit如下 //--------------------------------------------------------------------------- #include
|
imissyou
一般會員 發表:1 回覆:4 積分:1 註冊:2005-06-17 發送簡訊給我 |
|
RedSnow
版主 發表:79 回覆:1322 積分:845 註冊:2003-12-15 發送簡訊給我 |
|
deity
尊榮會員 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
imissyou您好:
测试您的程式,不是清空这步出错,而是
void __fastcall TForm1::Edit1Change(TObject *Sender) { P1=StrToFloat(Edit1->Text); } //--------------------------------------------------------------------------- void __fastcall TForm1::Edit2Change(TObject *Sender) { P2=StrToFloat(Edit2->Text); }上面两句出错,因你清空Edit1和Edit2时,有触发了Edit的onchange事件,执行strToFloat时出错,您可以将上两句写在onExit事件中即可,参考 void __fastcall TForm1::Edit1Exit(TObject *Sender) { P1=StrToFloat(Edit1->Text); } //--------------------------------------------------------------------------- void __fastcall TForm1::Edit2Exit(TObject *Sender) { P2=StrToFloat(Edit2->Text); }============================ 为什么经过多年以后,得失的过程如此冷漠 ============================ |
imissyou
一般會員 發表:1 回覆:4 積分:1 註冊:2005-06-17 發送簡訊給我 |
|
RedSnow
版主 發表:79 回覆:1322 積分:845 註冊:2003-12-15 發送簡訊給我 |
|
deity
尊榮會員 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
引言: 然後我把Change改成Exit 這步驟也是不行>"<您好:并不是说叫您将Change改成Exit。而是说将原来您写在Edit的onChange 事件里的内容改为写在Edit的onExit事件中。 void __fastcall TForm1::Edit1Change(TObject *Sender) {写在onExit事件的好处,是将焦点从Edit1移到其他组时触发事件,也即输完数字后才执行,对于onChange事件来说,比较合理。因为您写在OnChange事件中,如果您输入的是两位数的话,那它就执行两次onChange事件,只要Edit变动就执行。这样就显得没必要了,因您要的是输完之后读取所输入的内容而已,具体您可查下在线帮助。 onChange事件,您可以选中Form中的Edit1,然后查看Object Inspector的Events,找到OnExit,然后双击之后,输入上面代码即可,小弟试了没问题;另对于多个Edit需清空,你可以采用上面我给的两个方法,方便简捷。 PS:RedSnow前辈介绍的方法也是可行的,不过您参照上面两种事件的功能对比一下,自己依需选择吧。 ============================ 为什么经过多年以后,得失的过程如此冷漠 ============================ |
imissyou
一般會員 發表:1 回覆:4 積分:1 註冊:2005-06-17 發送簡訊給我 |
感謝大大們為我解答~
現在已經沒問題嚕..3Q各位
unit:
//--------------------------------------------------------------------------- #include
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |