線の描画

グラフィックとマルチメディアの処理：インデックス への移動

キャンバス上に直線を描くには，キャンバスの LineTo メソッドを使用します。

LineTo では現在のペン位置から指定した点まで線を描画し，線の終端を現在のペン位置にします。キャンバスでは直線をペンで描画します。

たとえば，フォームを表示するときフォーム全体に交差する斜線を描画するメソッドは次のようになります。

 procedure TForm1.FormPaint(Sender: TObject);
 begin
 with Canvas do
 begin
 MoveTo(0, 0);
 LineTo(ClientWidth, ClientHeight);
 MoveTo(0, ClientHeight);
 LineTo(ClientWidth, 0);
 end;
 end;

 void __fastcall TForm1::FormPaint(TObject *Sender)
 {
   Canvas->MoveTo(0,0);
   Canvas->LineTo(ClientWidth, ClientHeight);
   Canvas->MoveTo(0, ClientHeight);
   Canvas->LineTo(ClientWidth, 0);
 }

関連項目

• 多角線の描画