>>767
最後のここ
Form1.Canvas.CopyRect( Rect(0,0,s,s), Img.Canvas,Rect(0,0,s,s));

こーする
Form1.Canvas.Draw(0,0,Img);