现有包文件 NEW.BPL 包含窗体FORM1,Align属性设置为tclient.Tformstyle为 NORMAL.
在project11 中调用该窗体,调用部分代码如下:
PackageModule:=LoadPackage('new.bpl');
if PackageModule<>0 then
begin
AClass:=GetClass('Tform1');
if AClass<>nil then
begin
with TComponentClass(Aclass).Create(newtab) as TCUSTOMForm do
begin
newtab := TRzTabSheet.Create(RzPageControl1);
newtab.PageControl := RzPageControl1;
Visible:=true;
Parent:=newtab;
Left:=0;
Top:=0;
newtab.Caption:=Caption;
show;
free;
end;
------------
可以看的出来我是将FORM1放在RzPageControl1内创建的RzTabSheet中显示. 调用窗体成功了,
但是FORM1中放置的控件,MEMO1,EDIT1都看不见.不知道怎么回事,各位帮我出出注意谢谢了.!
在project11 中调用该窗体,调用部分代码如下:
PackageModule:=LoadPackage('new.bpl');
if PackageModule<>0 then
begin
AClass:=GetClass('Tform1');
if AClass<>nil then
begin
with TComponentClass(Aclass).Create(newtab) as TCUSTOMForm do
begin
newtab := TRzTabSheet.Create(RzPageControl1);
newtab.PageControl := RzPageControl1;
Visible:=true;
Parent:=newtab;
Left:=0;
Top:=0;
newtab.Caption:=Caption;
show;
free;
end;
------------
可以看的出来我是将FORM1放在RzPageControl1内创建的RzTabSheet中显示. 调用窗体成功了,
但是FORM1中放置的控件,MEMO1,EDIT1都看不见.不知道怎么回事,各位帮我出出注意谢谢了.!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货