如何實作動態 new 出來物件的event |
|
答題得分者是：dan59314
|
|
ken_huang
一般會員   發表：3 回覆：2 積分：1 註冊：2003-04-16 發送簡訊給我 |
|
|
taishyang
站務副站長   發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
ken_huang您好:
您可以參考下面連結:
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=27681
順心
|
|
dan59314
中階會員 發表：121 回覆：107 積分：86 註冊：2002-08-16 發送簡訊給我 |
// void __fastcall TForm1::MenuItemClick(TObject *Sender)
{
ShowMessage(((TMenuItem *)Sender)->Caption); //加上你的code......
} //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender)
{
TMenuItem **mnu;
int i,n=2,m=3;
char s[20]; mnu=new TMenuItem*[n]; for(i=0; i〈n; i )
{
mnu[i]=new TMenuItem(this);
sprintf(s,"mItem-%d",i);
mnu[i]->Caption=s;
mnu[i]->MenuItemClick;
//MainMenu1->Items->Add(mnu[i]);
MainMenu1->Items->Insert(1,mnu[i]);
}
} 軟還要更軟，我的Artwork
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=27674
|
發表時間：2003-04-16 13:44:51
IP:210.66.xxx.xxx 未訂閱
系統時間：2024-11-24 10:01:05
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |