如何得到到新增的表單物件的Edit.Text值或按那一個按鈕 |
答題得分者是:RaynorPao
|
a120803
初階會員 發表:61 回覆:66 積分:25 註冊:2003-03-12 發送簡訊給我 |
請問各位大大: 如何得到到新增的表單物件的Edit.Text值 如下程式碼: TForm *Form2; //宣告一個視窗
Form2=new TForm(this); //動態建立視窗,this是指此物件Form TEdit *Edit1; //宣告一個Edit
Edit1=new TLabel(this); //動態建立Edit,this是指此物件Edit
Edit1->Parent=Form2; //將Edit放在Form2上
Edit1->Caption="Good";
Form2->ShowModal(); //顯示Form2
delete Edit1;
delete Form2;
|
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 請問各位大大: 如何得到到新增的表單物件的Edit.Text值 如下程式碼: TForm *Form2; //宣告一個視窗 Form2=new TForm(this); //動態建立視窗,this是指此物件Form TEdit *Edit1; //宣告一個Edit Edit1=new TLabel(this); //動態建立Edit,this是指此物件Edit Edit1->Parent=Form2; //將Edit放在Form2上 Edit1->Caption="Good"; Form2->ShowModal(); //顯示Form2 delete Edit1; delete Form2;a120803 你好: 你的程式碼好像有點錯誤,我順便改成以下這樣 < class="code"> TForm *Form2; //宣告一個視窗 Form2=new TForm(this); //動態建立視窗,this是指此物件Form Form2->Caption="Form2"; TEdit *Edit1; //宣告一個Edit Edit1=new TEdit(this); //動態建立Edit,this是指此物件Edit Edit1->Parent=Form2; //將Edit放在Form2上 // Edit1->Caption="Good"; Form2->ShowModal(); //顯示Form2 // 在這裡就可以得到 Edit1->Text 例如: ShowMessage(Edit1->Text); delete Edit1; delete Form2; -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
a120803
初階會員 發表:61 回覆:66 積分:25 註冊:2003-03-12 發送簡訊給我 |
|
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 謝謝大大: 如果動態新增多個按鈕在動態新增的表單上,如何判定使用者是但哪一個按鈕ㄋ a120803 你好: (1)假設現在只要動態在 Form1 建立 2 個 TButton (btn1, btn2),先在你的 TForm1 class 裡面加入以下的宣告(Unit1.h) TButton *btn1; TButton *btn2; void __fastcall ButtonClick(TObject *Sender); (2)在動態 create 這 2 個 TButton 的時候,把 OnClick event procedure 指向同一個,範例程式碼如下: btn1=new TButton(Application); btn1->Parent=this; btn1->ButtonClick; btn1->Caption="btn1"; btn1->Left=100; btn1->Top=100; btn2=new TButton(Application); btn2->Parent=this; btn2->ButtonClick; btn2->Caption="btn2"; btn2->Left=200; btn2->Top=100; (3)接著就是實作 ButtonClick 這個 event procedure 了,範例程式碼如下: void __fastcall TForm1::ButtonClick(TObject *Sender) { ShowMessage(((TButton*)Sender)->Caption); } (4)這樣子就可以知道是哪一個 Button 被按到了 > --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
integrand
一般會員 發表:8 回覆:27 積分:17 註冊:2002-10-22 發送簡訊給我 |
|
a120803
初階會員 發表:61 回覆:66 積分:25 註冊:2003-03-12 發送簡訊給我 |
謝謝大大: 但是用了前一個人的方法卻得不到執行的結果ㄝ 程式碼如下: TForm *Form2; //宣告一個視窗
Form2=new TForm(this); //動態建立視窗,this是指此物件Form
AnsiString a;
TLabel *Label2; //宣告一個Label2
Label2=new TLabel(this); //動態建立Label2,this是指此物件Label2
Label2->Parent=Form2; //將Label2放在Form2上
Label2->Caption="Good"; TButton *Button2;
Button2=new TButton(this);
Button2->Parent=Form2;
if((TButton*)Sender==Button2)
{
ShowMessage("Good luck");
}
Form2->ShowModal(); //顯示Form2 delete Label2;
delete Button2;
delete Form2;
}
|
integrand
一般會員 發表:8 回覆:27 積分:17 註冊:2002-10-22 發送簡訊給我 |
引言: 謝謝大大: 但是用了前一個人的方法卻得不到執行的結果ㄝ 程式碼如下: TForm *Form2; //宣告一個視窗 Form2=new TForm(this); //動態建立視窗,this是指此物件Form AnsiString a; TLabel *Label2; //宣告一個Label2 Label2=new TLabel(this); //動態建立Label2,this是指此物件Label2 Label2->Parent=Form2; //將Label2放在Form2上 Label2->Caption="Good"; TButton *Button2; Button2=new TButton(this); Button2->Parent=Form2; if((TButton*)Sender==Button2) { ShowMessage("Good luck"); } Form2->ShowModal(); //顯示Form2 delete Label2; delete Button2; delete Form2; }RaynorPao的程式裡 btn1和btn2共用一個Click事件函數 所以要用條件式來判斷是那一個button if((TButton*)Sender==Button2) { ShowMessage("Good luck"); } 這類判別式你有寫在button的Click函數裡嗎? ~剩下的就交給帥氣了~ |
a120803
初階會員 發表:61 回覆:66 積分:25 註冊:2003-03-12 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |