关于窗体DOCK的问题(100分)

  • 主题发起人 主题发起人 yyk518
  • 开始时间 开始时间
Y

yyk518

Unregistered / Unconfirmed
GUEST, unregistred user!
请教各位,我将一个窗体DOCK到别一个窗体时,
如何让程序启动时自动DOCK到一起,而不要用鼠标去拖动呢?
 
form2.HostDockSite := form1;
form2.show;
但前提是可以托动Dock
 
请看
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1346084
功能强大的停靠控件,可以满足你的停靠要求
 
例,将Form2停靠到Form1上,要设置以下属性:

Form1.UseDockManager :=true;
Form1.DockSite :=true;

Form2.DragKind :=dkDock;
Form2.DragMode :=dmAutomatic; //让Form2可以拖动
Form2.HostDockSite :=Form1;


//显示Form2,Form2会自动停靠在Form1上
Form2.Show;
 
多人接受答案了。
 
后退
顶部