C++Builder から Delphi への移植 (ID:35725)

名前

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

本文 試していませんが、 Canvas.Rectangle( Round(x2*1000+ox), Round(oy-40), Round(x2*1000+ox-m2*300), Round(oy) ); Canvas.MoveTo(0, Round(oy)); Canvas.LineTo(Width, Round(oy)); を Rectangle( Round(x2*1000+ox), Round(oy-40), Round(x2*1000+ox-m2*300), Round(oy) ); MoveTo(0, Round(oy)); LineTo(Width, Round(oy)); にしてみるとか。