怎样作浮动的工具条？

Question

可用TToolBar97,网上很多的；
或者参考Delphi中demos中的dock的例子自己做.

Answer 1

panel是最好的容器，首先新建两个FORM，FROM1和FORM2，FORM1上放置两个PANEL，属性
如下：
Panel1：
align:alleft;
docksite:true;
usedockmanager: true;Panel2:
align:albottom;
docksite:true;
usemanager:true;form2:
anchors: [aktop,akbottom,akleft,akright];
dragmode:dmautomatic;
dragkind:dkdock;
然后就可以实现对Form2的拖拽（Form2就可以作为浮动工具栏）

Answer 2

建form1,form2.
form2的formstyle=fsStayOnTop;dockkind=dkDock;dragmode=dmAutomatic
form1上建一个panel:docksite=tuue;dragmode=dmAutomatic;

Answer 3

用CoolBar就可以了。在CoolBar上放置ToolBar，再将ToolBar的DragKind改为dkDock即可。