多角形の描画

提供: RAD Studio
移動先: 案内検索

図形の描画 への移動


任意の数の辺をもつ多角形をキャンバスに描くには、キャンバスの Polygon メソッドを呼び出します。

Polygon は、唯一のパラメータとして点の配列をとり、各点をペンでつなげ、さらに最後の点を最初の点につなげて多角形を閉じます。各線を描画した後、Polygon はブラシを使用して、多角形の内部を塗りつぶします。

たとえば、次のコードは、フォームの下左半分に直角三角形を描画します。

Delphi
procedure TForm1.FormPaint(Sender: TObject);
var 
  vertices: array[0..2] of TPoint;
begin
  vertices[0] := Point(10, 10);
  vertices[1] := Point(10, ClientHeight - 10);
  vertices[2] := Point(ClientWidth - 10, ClientHeight - 10);
  Canvas.Polygon(vertices);
end
C++
void __fastcall TForm1::FormPaint(TObject *Sender) {
    TPoint vertices[3];
    vertices[0] = Point(10, 10);
    vertices[1] = Point(10, ClientHeight - 10);
    vertices[2] = Point(ClientWidth - 10, ClientHeight - 10);
    Canvas->Polygon(vertices, 2);
}

関連項目