TabSheet作为parent的Frame组件,为什么会有这样的问题呢?

                            
这是我的代码   
      subSearchForm   :=   TFrameSearch.Create(nil);//这是一个frame  
   
      aTabSheet   :=   TRzTabSheet.Create(Self);//动态建立一个tabsheet  
      aTabSheet.PageControl   :=   RzPageControl1;//这是已经有的pagecontrol  
      RzPageControl1.ActivePage   :=   aTabSheet;  
      subSearchForm.Parent   :=   aTabSheet;  
      subSearchForm.Align:=alClient;  
      subSearchForm.Show;  
   
  为什么显示出来的frame不能继承主窗口的皮肤样式呢?而其他的都没有问题  
      而且,在frame里加了一个关闭按钮  
            里面:self.parent.free  
  报错,请问为什么?怎么解决

查看回复