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

請問一下取出座標的問題

答題得分者是:taishyang
ayuen
一般會員


發表:19
回覆:34
積分:10
註冊:2003-07-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-10-07 18:47:07 IP:140.128.xxx.xxx 未訂閱
請問一下取出座標的問題: 如何才能將Image中的mousedown之X,Y參數取出 以供其它呼叫 發表人 -
taishyang
站務副站長


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-10-07 18:53:35 IP:140.135.xxx.xxx 未訂閱
ayuen您好:   您的問題應該是屬於VCL區,我幫您移好了,希望下次您能注意一下< > 針對您的問題,設個全域變數應該就可以了 順心< > ~我也是在學習的階段,回答的不好請您多多見諒與指教~
ayuen
一般會員


發表:19
回覆:34
積分:10
註冊:2003-07-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-10-07 19:22:00 IP:140.128.xxx.xxx 未訂閱
抱歉沒注意到上錯版面 問題已解決
林嘉鋒
一般會員


發表:1
回覆:6
積分:1
註冊:2003-11-29

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-11-29 16:14:28 IP:218.172.xxx.xxx 未訂閱
不是很懂可以解釋在清楚一點ㄇ?? 謝謝
ayuen
一般會員


發表:19
回覆:34
積分:10
註冊:2003-07-31

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-11-29 16:33:58 IP:219.68.xxx.xxx 未訂閱
因為在Image裏都會有一項是記錄滑鼠指標在Image上之座標可用來作一些特殊動作 如: 以X,Y座標為準來劃出線條等
林嘉鋒
一般會員


發表:1
回覆:6
積分:1
註冊:2003-11-29

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-11-29 18:59:59 IP:218.172.xxx.xxx 未訂閱
但用全域變數要如何使用阿 我記得那個函式是這樣ㄉ void __fastcall TForm1::Image1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) X和Y就是我們要ㄉ座標阿 我疑問ㄉ是可以在另外ㄉ函式下取出X和Y的座標嗎? 謝謝
taishyang
站務副站長


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

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-11-29 19:16:35 IP:140.135.xxx.xxx 未訂閱
林嘉鋒您好: 試試下面的code
TPoint posi;//全域變數
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
 posi.x=X;
 posi.y=Y;
 Image1->Canvas->Rectangle(X-5,Y-5,X 5,Y 5);
}
//---------------------------------------------------------------------------    void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Image1->Canvas->MoveTo(0,0);
 Image1->Canvas->LineTo(posi.x,posi.y);
}
//---------------------------------------------------------------------------
先在Image上用滑鼠點一下,然後在按一下Button1 順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~
ayuen
一般會員


發表:19
回覆:34
積分:10
註冊:2003-07-31

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-11-29 19:21:05 IP:219.68.xxx.xxx 未訂閱
嘉鋒你好:          你可以在Unit1.h中的private:中去宣告全域變數          如: int StartX;              int StartY; 並於void __fastcall TForm1::Image1MouseDown(TObject *Sender,     TMouseButton Button, TShiftState Shift, int X, int Y)     {      StartX=X;      StartY=Y;     }
林嘉鋒
一般會員


發表:1
回覆:6
積分:1
註冊:2003-11-29

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-11-29 21:45:30 IP:218.172.xxx.xxx 未訂閱
了解.....謝謝
系統時間:2024-05-19 3:57:50
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!