清除直线的问题

Question

//创建
PaintBox1.canvas.Pen.Style:=psSolid;
PaintBox1.Canvas.MoveTo(x1,y1);
PaintBox1.Canvas.LineTo(x2,y2);
//清除
PaintBox1.canvas.Pen.Style:=psClear;
PaintBox1.Canvas.MoveTo(x1,y1);
PaintBox1.Canvas.LineTo(x2,y2);
但是这样写清除不调，有什么其他的好方法吗？（注：画线用背景颜色除外，最好也不要用到PaintBox1.Repaint），谢谢！

Answer 1

要是你背景是纯色滴 可以用背景色再 Line 一次要不是纯色，又需要足够快速度滴化 需要在内存中保存一个背景的副本清除时先计算好最小矩形区域用副本内容填充之期待更好的办法。

Answer 2

谢谢skertone() 
但是由于程序的需要，用颜色填充的方法不行，不知道有没有其他的方法