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

Form與Form之間的問題?

答題得分者是:taishyang
lanfanra
一般會員


發表:48
回覆:51
積分:19
註冊:2003-08-06

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-08-11 12:05:59 IP:61.66.xxx.xxx 未訂閱
假設我有2個Form, Form1和Form2; Form1上有個Button,此Button為呼叫Form2用;如果我一直按Button,則會 出現好多個Form2,請問我如何只讓Form2只出現一次,不管我按了幾次Button呢?
taishyang
站務副站長


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-08-11 13:53:51 IP:140.135.xxx.xxx 未訂閱
lanfanra您好: 請問您是如何呼叫Form2的呢?? 通常都是用
Form2->ShowModal(); 
或是
Form2->Show();
順心 ~我也是在學習的階段,回答的不好請您多多見諒與指教~ 發表人 - taishyang 於 2003/08/11 15:23:38
lanfanra
一般會員


發表:48
回覆:51
積分:19
註冊:2003-08-06

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-08-11 15:14:40 IP:61.66.xxx.xxx 未訂閱
我是用: TForm2 *Form2 Form2=new TForm2(Application); Form2->Show();
taishyang
站務副站長


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

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-08-11 15:24:58 IP:140.135.xxx.xxx 未訂閱
lanfanra您好:   因為您是動態產生Form的,所以您用完時要delete掉   即 
delete Form2;
順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~
lanfanra
一般會員


發表:48
回覆:51
積分:19
註冊:2003-08-06

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-08-11 15:32:13 IP:61.66.xxx.xxx 未訂閱
我是想讓Form1的Button不管按幾次按鍵,Form2都只會出現一次,不會說一直按就出現好多個Form2
taishyang
站務副站長


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

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-08-11 16:02:05 IP:140.135.xxx.xxx 未訂閱
lanfanra您好:  那試試下面的code
TForm *Form2 =new TForm(Application);
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 bool check=true;
 if (check)
 {
  Form2->Caption="我是新的Form";
  Form2->Show();
  check=false;
 }
}
//---------------------------------------------------------------------------
順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~ 發表人 -
lanfanra
一般會員


發表:48
回覆:51
積分:19
註冊:2003-08-06

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-08-11 16:16:52 IP:61.66.xxx.xxx 未訂閱
謝謝您的建議:不過程式好像要寫這樣才對喔!!! static bool check=true; if (check) { TForm2 *Form2; Form2=new TForm2(Application); Form2->Show(); check=false; }
taishyang
站務副站長


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

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-08-11 16:28:49 IP:140.135.xxx.xxx 未訂閱
lanfanra您好:  
引言:不過程式好像要寫這樣才對喔
耶,我測試可以用才貼上來的 而您的code效果是當Form關掉後就不會再create 我寫的效果可以重新create(且只會create一個) 順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~
lanfanra
一般會員


發表:48
回覆:51
積分:19
註冊:2003-08-06

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-08-11 17:22:19 IP:61.66.xxx.xxx 未訂閱
因為我是動態產生Form的,所以你的方式不能用耶
taishyang
站務副站長


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

發送簡訊給我
#10 引用回覆 回覆 發表時間:2003-08-11 17:36:17 IP:140.135.xxx.xxx 未訂閱
lanfanra您好:   我的方式是在From1上動態產生新的Form   在我的電腦上測試可行耶< > 順心< > ~我也是在學習的階段,回答的不好請您多多見諒與指教~
lanfanra
一般會員


發表:48
回覆:51
積分:19
註冊:2003-08-06

發送簡訊給我
#11 引用回覆 回覆 發表時間:2003-08-11 17:41:48 IP:61.66.xxx.xxx 未訂閱
我是用: TForm2 *Form2 Form2=new TForm2(Application); Form2->Show();    且Form2我在Project中的Options裡的Form選項設為Available forms說...
littlewheat
一般會員


發表:0
回覆:4
積分:0
註冊:2004-08-09

發送簡訊給我
#12 引用回覆 回覆 發表時間:2005-01-18 17:48:00 IP:211.23.xxx.xxx 未訂閱
請問我現在有兩個Form, Form1 & Form2 在compile時會出現Error,如下: [Linker Error] Unresolved external '_Form2' referenced from E:\.....\PROJECT1.OBJ [Linker Warning] Public symbol '_Form1' defined in both module E:\.....\UNIT1.OBJ and E:\....\UNIT2.OBJ 這是什麼問題?! 謝謝~~~
系統時間:2024-05-19 15:02:53
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!