创建Photoshop式浮动窗口应用程序
用过Photoshop的朋友一定对它的那些方便的浮动面板记忆犹新，其实这些面板就是一个个的小窗体，但这些小窗体都放在Photoshop的主窗体上（不是存在主窗体中），有自己的标题栏、最小化按钮及最大化按钮。但它们与MDI程序不同的是，他们可以拖到主窗体外，更重要的是工作中所有这些面板窗体与主窗体最处于激活状态。
用Spy & Capture查看一下就不难发现，这些面板窗体的Parent Window都是Photoshop的主窗体(以Photoshop CS为例，主窗体的Handle是001906D8，所有面板的Parent Window指向的就是001906D8），而一般我们创建的窗体的Parent是为None的。
下面的代码就为实现这种Photoshop式浮动窗口的示范：
//......
var
Form1: TForm1;
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
...[ 查看全文 ]
