FireMonkeyのPaintBox内に線を引きたい (ID:40993)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 OnPaintイベントで、 procedure TForm1.PaintBox1Paint(Sender: TObject; Canvas: TCanvas); begin Canvas.DrawLine(PointF(0,0), PointF(100,100), 1); end; のようにするでは、だめですか？