Delphi 打开子窗体皮肤问题

Delphi(Pascal) code

  if assigned(self.ActiveForm) then self.ActiveForm.Free;  aform:= aformClass.Create(owner);  //aform.BorderStyle := bsNone;  aform.Parent:= self.Panel1;  aform.Top:=0;  aform.Left:=0;  aform.Show;  aform.SetFocus;  self.ActiveForm:= aform;

打开后皮肤无效了？怎么回事 ？

[解决办法]
如果是vclskin，自己看看帮助，上面对很多种情况写的很清楚
[解决办法]
SkinData1.UpdateSkinControl(self,aform);