L
laozhongcheng
Unregistered / Unconfirmed
GUEST, unregistred user!
在FormCreate中加入代码
with TPanel.Create(Self) do
begin
DockSite := True;
Parent := Form1;
Align := alTop;
Visible := True;
Height := 200;
end;
然后将另外一个Form停靠到这个控件上
那么，拉左边的竖条将无法将Form取消停靠
（必须拉那个关闭钮）
但是如果这个Panel是设计时加入的却可以
而且如果Align为alLeft, alBottom, alRight的时候都可以
D7同样存在 是否是BUG？如何解决？
待答。多谢参与。
with TPanel.Create(Self) do
begin
DockSite := True;
Parent := Form1;
Align := alTop;
Visible := True;
Height := 200;
end;
然后将另外一个Form停靠到这个控件上
那么，拉左边的竖条将无法将Form取消停靠
（必须拉那个关闭钮）
但是如果这个Panel是设计时加入的却可以
而且如果Align为alLeft, alBottom, alRight的时候都可以
D7同样存在 是否是BUG？如何解决？
待答。多谢参与。
]）。