線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1176
推到 Plurk!
推到 Facebook!

兩個chart同指向 一個Tpopupmenu,如何判斷是哪個chart去按的

答題得分者是:supman
seedbcc
高階會員


發表:232
回覆:272
積分:105
註冊:2003-12-10

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-07-06 17:05:07 IP:221.169.xxx.xxx 未訂閱
兩個chart同指向 一個Tpopupmenu,如何判斷是哪個chart去按的 chart1 chart2 ------------ Tpopupmenu有個 n1 click procedure TFrm_P.N1Click(Sender: TObject); begin // ???如何判斷是哪個chart按滑鼠右鍵點選的 ?? end;
supman
尊榮會員


發表:29
回覆:770
積分:924
註冊:2002-04-22

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-07-06 17:17:13 IP:61.70.xxx.xxx 未訂閱
procedure TForm1.N23411Click(Sender: TObject); begin if (ActiveControl=Chart1) then ShowMessage('Chart1'); if (ActiveControl=Chart2) then ShowMessage('Chart2'); end;
seedbcc
高階會員


發表:232
回覆:272
積分:105
註冊:2003-12-10

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-07-06 17:22:57 IP:221.169.xxx.xxx 未訂閱
都沒有showmessage ??
supman
尊榮會員


發表:29
回覆:770
積分:924
註冊:2002-04-22

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-07-06 17:38:04 IP:61.70.xxx.xxx 未訂閱
改成以下這樣,因為沒有焦點沒辦法用上面的方式. procedure TForm1.N23411Click(Sender: TObject); begin if (PopupMenu1.PopupComponent=Chart1) then ShowMessage('Chart1'); if (PopupMenu1.PopupComponent=Chart2) then ShowMessage('Chart2'); end; 發表人 - supman 於 2005/07/06 17:57:49
jimmy_wei
高階會員


發表:9
回覆:176
積分:147
註冊:2003-08-28

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-07-06 17:52:22 IP:210.244.xxx.xxx 未訂閱
Dear seedbcc: 如果將兩個chart的OnMouseDown指向同一個MouseDown事件, 然後在看TChart(Sender).Name是誰,是不是可以解決你的問題??
系統時間:2024-06-25 13:43:59
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!