在Delphi中要画线段,需要先将画笔移到线段的一个端点,然后再画到另一个端点
Canvas.MoveTo(x1,y1);//移动到线段的一个端点
Canvas.LineTo(x2,y2);//画线到另一个端点
如果是多条首尾相连的线段,则只需要先移动到其中一条线段的端点上(MoveTo),之后一直画线(LineTo),直到最后一条线段的最后一个端点
MoveTo是只移动,不画线,LineTo是从当前点画线到指定点.
Lineto():从当前的位置到点(X,Y)画直线
Self.Canvas.MoveTo(0, 0); //从坐标0.0开始
Self.Canvas.LineTo(30, 30); //画到坐标为30.30的位置