全部博文(788)
分类:
2009-05-26 17:33:23
TRect是一个矩形区域,用左上角的点和右下角的点来确定位置
ClientRect就是客户区的区域
t_interfase.Dock(panel3,rect1); 是将t_interfase这个控件拖放到Panel3上面
看看这样的代码,应该可以理解是什么意思:
var Rect1 : TRect;
begin
Panel1.DockSite := True;
Panel1.Color := clRed;
Panel2.DragKind := dkDock;
Panel2.DragMode := dmAutomatic;
Rect1 := Panel1.ClientRect;
Panel2.Dock(Panel1, Rect1);
Panel1.DockManager.InsertControl(Panel2,alClient,Panel2);
end;
我是來頂老之地!