如何实现Delphi6 IDE中工具条的无矩形框出坞操作呢？

[HappyEveryDayR]

由于 Delphi6 的封装，当我们实现工具栏的停靠编程时是很方便的。
在窗体上放一个ControlBar控件，并设它的DockSite为True，然后再放一个ToolBar，并设它的DragKind为dkDock，DragMode为dmAutomatic，即可轻松实现工具条停靠在ControlBar上的效果。
但是，当我们把该工具条从ControlBar上拉出来时，却发现有一矩形框一直跟着该它，以表示当前该工具条实际所在的屏幕位置。但是，在 Delphi6 IDE中工具条却不是这样的，它没有任何矩形框包围，那么我想请问各位大虾，用什么方法可以实现之呢？