多角形の描画
図形の描画 への移動
任意の数の辺をもつ多角形をキャンバスに描くには、キャンバスの 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);
}