在鼠标移动事件中表单闪烁太多

I wrote the following procedure to move and dock a borderless window:I wrote the following procedure to move and doc