如何求角度?? |
尚未結案
|
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
|
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
|
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
|
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
residue您好:
您可以參考下面的code,臨時寫的可能沒有考慮周詳
void __fastcall TForm1::FormPaint(TObject *Sender) { Canvas->Pen->Color=clBlack; Canvas->MoveTo(Label1->Left,Label1->Top); Form1->Caption="原點位置"+IntToStr(Label1->Left)+", "+IntToStr(Label1->Top); Canvas->LineTo(Label1->Left-100,Label1->Top); Canvas->LineTo(Label1->Left+100,Label1->Top); Canvas->MoveTo(Label1->Left,Label1->Top); Canvas->LineTo(Label1->Left,Label1->Top+100); Canvas->LineTo(Label1->Left,Label1->Top-100); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { Canvas->Pen->Color=clBlue; Canvas->MoveTo(X,Y); Canvas->LineTo(Label1->Left,Label1->Top); Canvas->TextOutA(X,Y,IntToStr(X)+","+IntToStr(Y)); double X0=Label1->Left; double Y0=Label1->Top; double X1=X; double Y1=Y; int Angle; if (X1!=X0&&Y0>Y1&&X1>X0) //第一象限 Angle=-1*atan((Y1-Y0)/(X1-X0))*180/M_PI; else if (X1!=X0&&Y0>Y1&&X0>X1) //第二象限 Angle=180-atan((Y1-Y0)/(X1-X0))*180/M_PI; else if (X1!=X0&&Y1>Y0&&X0>X1) //第三象限 Angle=180-atan((Y1-Y0)/(X1-X0))*180/M_PI; else if (X1!=X0&&Y1>Y0&&X1>X0) //第四象限 Angle=360-atan((Y1-Y0)/(X1-X0))*180/M_PI; else if (X1==X0&&Y0>Y1) //90度 Angle=90; else if (X1==X0&&Y1>Y0) //270度 Angle=270; Edit1->Text=Angle; }效果如下圖所示 順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~> 發表人 - |
residue
中階會員 發表:90 回覆:153 積分:53 註冊:2003-07-02 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |