不同尺寸的Image之间的copyRect,为什么图像中有一点一点的东西?该如何处理

不同尺寸的Image之间的copyRect,为什么图像中有一点一点的东西?
首先在Image1中画一条线(Image1为200×200)
  Image1-> Canvas-> Pen-> Width   =   2;
            Image1-> Canvas-> MoveTo(0,0);
            Image1-> Canvas-> LineTo(100,100);
接着把Image1中的图像复制到Image2中(Image2为400×400   )
Image2-> Canvas-> CopyRect(Image2-> Canvas-> ClipRect,Image1-> Canvas,Image1-> Canvas-> ClipRect)     ;
        Image2-> Refresh();
为什么Image2中的直线上有很多点呢?


------解决方案--------------------
不要用ClipRect,自己定义一个TRect,拷贝特定的区域