设计器

修正label控件问题

designer/utslvcldcomponents.tsf

@@ -964,7 +964,7 @@ type TDVirutalWindow = class(TCustomControl) //
         width := 30;
         height := 30;
         FWindowFileds := array("left","top","height","width"); 
-        ParentFont := true;
+        //ParentFont := true;
     end 
     function paint();override;
     begin
@@ -1464,7 +1464,7 @@ type TGraphicLabelWindow = class(TDVirutalWindow)
         BindComp := new tlabel(self);
         width := BindComp.width;
         height := BindComp.Height;
-        WindowFileds := array("left","top","width","height","color","font","border","caption","visible","align","anchors");
+        WindowFileds := array("left","top","width","height","color","parentcolor","font","parentfont","border","caption","visible","align","anchors");
     end 
     
     function DesigningSizer();override;