我參考書及寫了一個畫封閉多邊形的小程式,但在繪製第二或更多個多邊形時,往往會與前一個多邊形的終點連在一起,想請各位高手為我解惑一下  謝謝 >>>>>>>>>

------
陳筱微

您好:    PO程式碼的方式請參考版規說明,煩請修改謝謝您的配合 >

kame2004 您好：    1.因為Polyline(不會連成封閉圖形)與Polygon(連成封閉圖形)兩者畫圖時略有不同，所以作了一些修正。 2.double click 會再引入新的點導致繪圖的不精確，因此我將其移除。 3.所有的反應均由滑鼠的左右鍵控制：左鍵選點，右鍵畫圖。    改寫程式碼如下，請參考。    

void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
  if ( Button==mbLeft )
    { // if ( md>=POINT_MAX-1 ) return; // 假設最多存POINT_MAX點
      P[md]=Point(X,Y);
      Image1->Canvas->Pixels[X][Y]=clRed;
      md  ;
    }
  else
    { switch(con)
        { case 1:
            P[md] = P[0];
            Image1->Canvas->Polyline(P,md);
            break;
          case 2:
            Image1->Canvas->Polygon(P,md-1);
            break;
        }
      md = 0;
    }
}

RichTop 敬上 =====***** 把數學當工具，可以解決問題；將數學變能力，能夠發現並解決問題！ =====##### 發表人 - richtop 於 2005/05/10 22:43:27

試試加上Image2->Canvas->MoveTo(X,Y); (X,Y)為你要畫的第二個多邊形的起始位置