Fix in bgraled compiling with newest lazarus and fpc

bgra_pascalscript_library/bgra_pascalscript_library.lpi

@@ -106,7 +106,6 @@
       <Unit1>
         <Filename Value="..\bgrapascalscript.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="BGRAPascalScript"/>
       </Unit1>
     </Units>
   </ProjectOptions>

bgracontrols.pas

@@ -8,14 +8,13 @@ interface
 
 uses
   BCBaseCtrls, BCButton, BCEffect, bcfilters, BCGameGrid, BCImageButton, 
-  BCLabel, BCPanel, BCRTTI, BCStylesForm, BCTileMap, BCTools, 
-  BGRAFlashProgressBar, BGRAGraphicControl, BGRAImageList, 
-  BGRAImageManipulation, BGRAKnob, BGRALED, BGRAResizeSpeedButton, BGRARKnob, 
-  BGRAScript, BGRAShape, BGRASpeedButton, BGRASpriteAnimation, 
-  BGRAVirtualScreen, DTAnalogClock, DTAnalogCommon, DTAnalogGauge, 
-  dtthemedclock, dtthemedgauge, uEKnob, ueled, uEMultiTurn, uERotImage, 
-  uESelector, BGRAPascalScript, uPSI_BGRAPascalScript, BCTrackbarUpdown, 
-  BCToolBar, LazarusPackageIntf;
+  BCLabel, BCPanel, BCRTTI, BCStylesForm, BCTileMap, BCToolBar, BCTools, 
+  BCTrackbarUpdown, BGRAFlashProgressBar, BGRAGraphicControl, BGRAImageList, 
+  BGRAImageManipulation, BGRAKnob, BGRALED, BGRAPascalScript, 
+  BGRAResizeSpeedButton, BGRARKnob, BGRAScript, BGRAShape, BGRASpeedButton, 
+  BGRASpriteAnimation, BGRAVirtualScreen, DTAnalogClock, DTAnalogCommon, 
+  DTAnalogGauge, dtthemedclock, dtthemedgauge, uEKnob, ueled, uEMultiTurn, 
+  uERotImage, uESelector, uPSI_BGRAPascalScript, LazarusPackageIntf;
 
 implementation
 
@@ -26,6 +25,8 @@ begin
   RegisterUnit('BCImageButton', @BCImageButton.Register);
   RegisterUnit('BCLabel', @BCLabel.Register);
   RegisterUnit('BCPanel', @BCPanel.Register);
+  RegisterUnit('BCToolBar', @BCToolBar.Register);
+  RegisterUnit('BCTrackbarUpdown', @BCTrackbarUpdown.Register);
   RegisterUnit('BGRAFlashProgressBar', @BGRAFlashProgressBar.Register);
   RegisterUnit('BGRAGraphicControl', @BGRAGraphicControl.Register);
   RegisterUnit('BGRAImageList', @BGRAImageList.Register);
@@ -48,8 +49,6 @@ begin
   RegisterUnit('uERotImage', @uERotImage.Register);
   RegisterUnit('uESelector', @uESelector.Register);
   RegisterUnit('uPSI_BGRAPascalScript', @uPSI_BGRAPascalScript.Register);
-  RegisterUnit('BCTrackbarUpdown', @BCTrackbarUpdown.Register);
-  RegisterUnit('BCToolBar', @BCToolBar.Register);
 end;
 
 initialization

bgraled.pas

@@ -92,7 +92,7 @@ type
     property DragMode;
     property Enabled;
   //  property ParentColor;   //TODO: What is this for?
-    property ParentColor: Boolean default False;
+    property ParentColor;
     property ParentShowHint;
     property PopupMenu;
     property ShowHint;