(Delphi)请教各位一个关于窗口拖放留下残影的问题

我用的是Delphi7 ,在窗体的OnCreate事件中设置了
BorderStyle:=bsNone;
BrushStyle:=bsClear;
然后窗体上放置了一个图片Image 并在Image的OnMouseDown事件中
ReleaseCapture;
PostMessage(handle,WM_SYSCOMMAND,SC_MOVE+1,0)

这样就是实现了用户拖动图片能让窗体移动的目的,
现在问题是 窗体移动过后,窗体中没有图片的部分会有残影,这个怎么解决呢?

我贴个图各位看看效果 下图是没拖动前
图片说明

向右拖动后 如下图图片说明
我用红色框框的部分 就是窗体移动留下的残影

请问这个怎么才能去掉呢?

https://bbs.csdn.net/topics/370065338