haitao:
把TmyBaseFrame的基类由Tframe改为Tform了,但是显示它的派生类时,怎么无法显示了??!!
[阅读: 543] 2007-05-14 09:19:35
把TmyBaseFrame的基类由Tframe改为Tform了,
type
TmyBaseFrame = class(//TFrame)
TForm)
。。。。
end;
但是显示它的派生类时,怎么无法显示了??!!
TFrameMeeting=class(TmyBaseFrame)
。。。
end;
在主form里定义:
FrameMeeting:TFrameMeeting;
显示时:
self.FrameMeeting:= UnitFrameMeetingMng.TFrameMeetingMng.Create(self);
self.FrameMeeting.Parent:=TSvmeeting; //显示到PageControl的一页(Tabsheet)里面
self.FrameMeeting.Align:=alclient; //占满整个页
//TSvmeeting.TabVisible:=true;
但是,运行时TSvmeeting里并没有出现FrameMeeting!!!
难道不是这样显示的吗?对Frame,这样是可以显示的。。。。。