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

動態建立元件ㄉ問題

答題得分者是:taishyang
李國維
高階會員


發表:42
回覆:287
積分:235
註冊:2003-02-07

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-09-25 20:41:39 IP:211.22.xxx.xxx 未訂閱
想請問各位大大: 我動態建立ㄌ10各Button,也把OnClick指向自己寫ㄉ函式中. 現在遇到ㄌ一各問題.除ㄌ用Tag來知道是第幾各Button動作外. 還有別ㄉ辦法嗎.因為Tag我用來判斷別ㄉ東西ㄌ.
taishyang
站務副站長


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-09-25 20:56:55 IP:140.135.xxx.xxx 未訂閱
李國維您好:   您可參考下面的code,利用Name
//*.h
class TForm1 : public TForm
{
__published:        // IDE-managed Components
        void __fastcall FormCreate(TObject *Sender);
private:        // User declarations
public:                // User declarations
        __fastcall TForm1(TComponent* Owner);
   void __fastcall MyBtnClick(TObject *Sender);
}; 
//*.cpp
TButton* MyBtn[10];
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------    void __fastcall TForm1::FormCreate(TObject *Sender)
{
 for (int i=0;i<10;i  )
 {
  MyBtn[i]=new TButton(this);
  MyBtn[i]->Parent=Form1;
  MyBtn[i]->Name="Btn" IntToStr(i);
  MyBtn[i]->Top=i*25;
  MyBtn[i]->MyBtnClick;
 }    }
//---------------------------------------------------------------------------
void __fastcall TForm1::MyBtnClick(TObject *Sender)
{
 if (((TButton*)Sender)->Name=="Btn1")
 ((TButton*)Sender)->Caption="我被按到了!!";
}
//---------------------------------------------------------------------------
順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~ 發表人 -
bruce0211
版主


發表:157
回覆:668
積分:279
註冊:2002-06-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-09-26 08:52:13 IP:211.21.xxx.xxx 未訂閱
Hint 屬性若沒用到的話,也可拿來用 只不過 Tag 是放整數,Hint 是放字串 但有StrToInt()及 IntToStr()可相互轉換
系統時間:2024-07-01 5:31:54
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!