启动时就有窗体停泊

Tags: /超级猛料/VCL/Form，窗体/   Date Created:

用 ManualDock吧
例：
Form1中加Panel1,Panel1的属性DockSite设为True,
Form2的属性DragKind设为dkDock, DragMode设为dmAuromatic
在Form1的OnShow中加：
Form2.Show;
Form2.ManualDock(Panel1, nil, alclient);
form2.FormStyle:=fsStayOnTop;