delphi panel移动问题

我有一个panel是显示视频的现在用panel的DragKind属性设为dkDock，在OnMouseDown事件中写代码：panel.BeginDrag(False);
把可被停靠的窗体的DockSite属性设置为True
然后移动到他停靠的窗体了视频就不显示了就是个白面了
请问各位高人这个是什么问题 具体该怎么解决
谢谢