我在父窗中调用子窗体,代码如下
procedure TTMain.N2Click(Sender: TObject);
var
t:TTchildA;
begin
t:=TTchildA.Create(Application);
//我在这里设一下子窗体的属性,在显示的时候不是子窗设计时的大小呢???
//如果这里不设属性,在设计子窗体的时候设为FsMdichild的话,就正常了,怪事???
t.FormStyle:=fsMDIChild;
t.Show;
end;
procedure TTMain.N2Click(Sender: TObject);
var
t:TTchildA;
begin
t:=TTchildA.Create(Application);
//我在这里设一下子窗体的属性,在显示的时候不是子窗设计时的大小呢???
//如果这里不设属性,在设计子窗体的时候设为FsMdichild的话,就正常了,怪事???
t.FormStyle:=fsMDIChild;
t.Show;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货