如何实现窗体停靠

Question

呵呵，delphi自带例子，你为什么不看呢？？

Answer 1

象vc++的左面的Workspace窗口一样

Answer 2

参考这个，我原先写的实现DELPHI中的工具栏窗口融合技术（Docking）  
javis.chi
摘　要：
关键字：窗口融合技术，Docking
类　别：用户界面
 
 
经常看到一些软件上的工具栏可以拖动，或者放入一个特定的Panel中，就象DELPHI IDE一样，可以把Watch List窗口放入IDE中。
仔细研究了下，呵呵，终于可以实现了：1，在一个Form1中，放入Panel1：
属性： 
　　Align：alleft； 
　　Docksite：true； 
　　UseDockManager：true； 2，添加一个新的窗体Form2，上面可以随便放些什么控件
属性：
    anchors：[aktop，akbottom，akleft，akright]； 
　　dragmode：dmautomatic； 
　　dragkind：dkdock3，在Form1中包含Form2的声名
uses Unit2;3,在窗体Form1上放置一个Button1，用于调出Form2窗体
设置Button1的OnClick事件，对应的代码如下： 
　　procedure TForm1.Button1Click(Sender: TObject); 
　　begin 
　　  form2.Show; 
　　end; 到此为止，程序全部完成，So Easy...
程序在Delphi5+Windows2000(p)环境下测试通过。