启动时就有窗体停泊

  • 主题发起人 主题发起人 import
  • 开始时间 开始时间
I

import

Unregistered / Unconfirmed
GUEST, unregistred user!
用 ManualDock吧
例:
Form1中加Panel1,Panel1的属性DockSite设为True,
Form2的属性DragKind设为dkDock, DragMode设为dmAuromatic
在Form1的OnShow中加:
Form2.Show;
Form2.ManualDock(Panel1, nil, alclient);
form2.FormStyle:=fsStayOnTop;
 
后退
顶部