PopupMenu選單的問題 |
尚未結案
|
qaeroman
一般會員 發表:6 回覆:6 積分:2 註冊:2003-06-19 發送簡訊給我 |
|
dllee
站務副站長 發表:321 回覆:2519 積分:1711 註冊:2002-04-15 發送簡訊給我 |
您的第2個問題是動態產生物件及動態設定物件屬性,這類的文章在站內已有一些可以參考,而第一個問題如果要按每一個 Image 物件在選單按下去要作不同的事時,可以參考以下的 code
TImage *ImageObject; int ImageIndex; //----------------------------------------------------------------------------// void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { // 以 MouseUp 的事件叫用 PopupMenu1,同時設定是那一個 Image 物件所觸發的, // 如此在 PopupMenu1 選單中,即可使用 ImageObject 來對每一個 Image 作不同的處理。 ImageObject=(TImage *)Sender; TPoint pt=ImageObject->ClientToScreen(TPoint(X,Y)); PopupMenu1->Popup(pt.x,pt.y); } //----------------------------------------------------------------------------// void __fastcall TForm1::Button1Click(TObject *Sender) { // 動態產生 Image 物件 TImage *newImage=new TImage(this); newImage->Name="Image" IntToStr( ImageIndex); // 指定 Name newImage->Parent=this; newImage->Left=10*ImageIndex; newImage->Top=10*ImageIndex; newImage->Width=100; newImage->Height=100; newImage->Picture->LoadFromFile("test.bmp"); newImage->Image1MouseUp; // 動態設定事件 } //----------------------------------------------------------------------------// // 以下是 popup 選單的選項工作,可以對 ImageObject 按其 Name 屬性 // 作不同的處理 void __fastcall TForm1::Show1Click(TObject *Sender) { ShowMessage("Show " ImageObject->Name); } //----------------------------------------------------------------------------// void __fastcall TForm1::Hide1Click(TObject *Sender) { ShowMessage("Hide " ImageObject->Name); } //----------------------------------------------------------------------------//沒空更新的網頁... http://dllee.ktop.com.tw C及指標教學,計算機概論,資訊管理導論... http://dllee.adsldns.org 介紹Shells,LiteStep,GeoShell....
------
http://www.ViewMove.com |
qaeroman
一般會員 發表:6 回覆:6 積分:2 註冊:2003-06-19 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |