全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1576
推到 Plurk!
推到 Facebook!

如何在一個Edit中進行數字的加減乘除

答題得分者是:taishyang
Ece.Winson
一般會員


發表:13
回覆:19
積分:6
註冊:2003-05-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-05-27 18:38:57 IP:61.218.xxx.xxx 未訂閱
各位大大: 小弟試了很多遍,就是無法 只在一個Edit中完成 請各位提供一些意見 謝謝 初學者 上
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-05-27 18:47:22 IP:140.135.xxx.xxx 未訂閱
Ece.Winson您好:   Edit可以將當作您的輸入,也可以當作是您的輸出   int a=4,b=2;   Edit1->Text=IntToStr(a+b);加   或是Edit1->Text="a+b="+IntToStr(a+b); 您指的是這樣嗎??    順心 <>~我也是在學習的階段,所以請您多多見諒與指教~ 發表人 -
Ece.Winson
一般會員


發表:13
回覆:19
積分:6
註冊:2003-05-27

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-05-27 19:10:22 IP:61.218.xxx.xxx 未訂閱
taishyang您好: 不好意思我的問題寫的不是很清楚 主要是想要在執行程式時可以由 鍵盤來輸入數值進行加減乘除的話 應該要怎麼做才對 謝謝您的回答
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-05-27 19:26:05 IP:140.135.xxx.xxx 未訂閱
Ece.Winson您好:  
引言: 主要是想要在執行程式時可以由 鍵盤來輸入數值進行加減乘除的話
您是不要要寫一個小算盤?? 您的加數與被加數都要在同一個Edit輸入嗎??? ~我也是在學習的階段,所以請您多多見諒與指教~ 發表人 - taishyang 於 2003/05/27 19:35:48
Ece.Winson
一般會員


發表:13
回覆:19
積分:6
註冊:2003-05-27

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-05-27 22:58:20 IP:61.218.xxx.xxx 未訂閱
taishyang您好: 是的,我就是想寫一個小算盤 如您所說的我想將加數與被加數 都在同一個Edit輸入,不知道應該要怎麼寫才對 希望您能指導我一下,謝謝 初學者 Ece.Winson上
turboted
版主


發表:95
回覆:754
積分:452
註冊:2002-07-23

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-05-27 23:19:52 IP:218.166.xxx.xxx 未訂閱
一個例子是 (1)輸入8 (2)按下* (3)清除8 並把8 放在temp 變數裏面 (4)按下4 (5)按下enter (6)把temp * 4 秀在畫面上 就行了
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-05-27 23:36:45 IP:140.135.xxx.xxx 未訂閱
Ece.Winson您好:   我做一個加法的範例(很破)其他依此類推,並注意其他細節       
 
int temp;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
//=號按鈕
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  ShowMessage(temp+StrToInt(Edit1->Text));
}
//---------------------------------------------------------------------------
//+號按鈕
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  temp=StrToInt(Edit1->Text);
  Edit1->Text="";
}
//---------------------------------------------------------------------------
   
順心 <>~我也是在學習的階段,所以請您多多見諒與指教~ 發表人 -
Ece.Winson
一般會員


發表:13
回覆:19
積分:6
註冊:2003-05-27

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-05-28 10:34:12 IP:140.134.xxx.xxx 未訂閱
taishyang您好:               謝謝您的熱心指導,幫我解除了疑惑               謝謝. ( >
系統時間:2024-05-19 8:06:44
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!