請問如何控制動態產生的物件 |
|
尚未結案
|
|
Paul20
一般會員   發表：1 回覆：0 積分：0 註冊：2004-04-25 發送簡訊給我 |
我動態產生10個button
void __fastcall TForm1::NewGameClick(TObject *Sender)
{
for ( i=0 ; i<10 ; i ) //產生button
{
cell[i]=new TButton(Form1);
cell[i]->Parent=Form1;
cell[i]->Height=100;
cell[i]->Width=50;
cell[i]->Left=i*50;
cell[i]->Top=100;
cell[i]->Show();
} for ( int k=0 ; k<10 ; k )
{
cell[k]->bClick;
}
}
...
...
...
void __fastcall TForm1::bClick(TObject *Sender)
{
((Tbutton *)FindComponent("cell[" IntToStr(k) "]"))->Top ;
} 我想要按下cell[1]時,cell[1]的Top就下降,按下cell[2]時,cell[2]的Top就下降,以此類推
我是這樣寫,可是邏輯好像不對,語法也不對
請各位指教
感激不盡
ps:第一次po文,表達可能不清楚,對不起 發表人 - taishyang 於 2004/05/07 13:37:33
|
|
jest0024
高階會員  發表：11 回覆：310 積分：224 註冊：2002-11-24 發送簡訊給我 |
引言: 我動態產生10個button void __fastcall TForm1::NewGameClick(TObject *Sender) { for ( i=0 ; i<10 ; i ) //產生button { cell[i]=new TButton(Form1); cell[i]->Parent=Form1; cell[i]->Height=100; cell[i]->Width=50; cell[i]->Left=i*50; cell[i]->Top=100; cell[i]->Show(); } for ( int k=0 ; k<10 ; k ) { cell[k]->bClick; } } ... ... ... void __fastcall TForm1::bClick(TObject *Sender) { ((TButton *)Sender)->Top ; // ((Tbutton *)FindComponent("cell[" IntToStr(k) "]"))->Top ; FindComponent(Value); //Value為物件名稱(元件的Name屬性)，非變數名稱 } 我想要按下cell[1]時,cell[1]的Top就下降,按下cell[2]時,cell[2]的Top就下降,以此類推 我是這樣寫,可是邏輯好像不對,語法也不對 請各位指教 感激不盡 ps:第一次po文,表達可能不清楚,對不起學而時習之不亦樂乎! |
發表時間：2004-05-07 01:42:51
IP:61.230.xxx.xxx 未訂閱
系統時間：2024-11-25 1:28:25
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |