Separated pascal script units. Removed unnecessary dependencies.

BGRAPascalScriptComponent.lpk

@@ -0,0 +1,43 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<CONFIG>
+  <Package Version="4">
+    <PathDelim Value="\"/>
+    <Name Value="bgrapascalscriptcomponent"/>
+    <Type Value="RunAndDesignTime"/>
+    <CompilerOptions>
+      <Version Value="11"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+    </CompilerOptions>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="bgrapascalscript.pas"/>
+        <UnitName Value="BGRAPascalScript"/>
+      </Item1>
+      <Item2>
+        <Filename Value="upsi_bgrapascalscript.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uPSI_BGRAPascalScript"/>
+      </Item2>
+    </Files>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="BGRABitmapPack"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="pascalscript"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+      </Item3>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>

bgra_pascalscript_library/bgra_pascalscript_library.lpi

@@ -17,9 +17,6 @@
     <i18n>
       <EnableI18N LFM="False"/>
     </i18n>
-    <VersionInfo>
-      <StringTable ProductVersion=""/>
-    </VersionInfo>
     <BuildModes Count="3">
       <Item1 Name="Debug" Default="True"/>
       <Item2 Name="Release">
@@ -93,10 +90,13 @@
         <FormatVersion Value="1"/>
       </local>
     </RunParams>
-    <RequiredPackages Count="1">
+    <RequiredPackages Count="2">
       <Item1>
-        <PackageName Value="BGRABitmapPack4NoGUI"/>
+        <PackageName Value="bgrapascalscriptcomponent"/>
       </Item1>
+      <Item2>
+        <PackageName Value="BGRABitmapPack4NoGUI"/>
+      </Item2>
     </RequiredPackages>
     <Units Count="2">
       <Unit0>

bgracontrols.lpk

@@ -22,8 +22,8 @@
         </Debugging>
       </Linking>
     </CompilerOptions>
-    <Version Major="4" Minor="2"/>
-    <Files Count="42">
+    <Version Major="4" Minor="3"/>
+    <Files Count="40">
       <Item1>
         <Filename Value="bcbasectrls.pas"/>
         <UnitName Value="BCBaseCtrls"/>
@@ -153,90 +153,75 @@
         <UnitName Value="BGRAKnob"/>
       </Item27>
       <Item28>
-        <Filename Value="bgrapascalscript.pas"/>
-        <UnitName Value="BGRAPascalScript"/>
-      </Item28>
-      <Item29>
         <Filename Value="bgraresizespeedbutton.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="BGRAResizeSpeedButton"/>
-      </Item29>
-      <Item30>
+      </Item28>
+      <Item29>
         <Filename Value="bgrascript.pas"/>
         <UnitName Value="BGRAScript"/>
-      </Item30>
-      <Item31>
+      </Item29>
+      <Item30>
         <Filename Value="bgrashape.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="BGRAShape"/>
-      </Item31>
-      <Item32>
+      </Item30>
+      <Item31>
         <Filename Value="bgraspeedbutton.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="BGRASpeedButton"/>
-      </Item32>
-      <Item33>
+      </Item31>
+      <Item32>
         <Filename Value="bgraspriteanimation.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="BGRASpriteAnimation"/>
-      </Item33>
-      <Item34>
+      </Item32>
+      <Item33>
         <Filename Value="bgravirtualscreen.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="BGRAVirtualScreen"/>
-      </Item34>
-      <Item35>
+      </Item33>
+      <Item34>
         <Filename Value="dtanalogclock.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="DTAnalogClock"/>
-      </Item35>
-      <Item36>
+      </Item34>
+      <Item35>
         <Filename Value="dtanalogcommon.pp"/>
         <UnitName Value="DTAnalogCommon"/>
-      </Item36>
-      <Item37>
+      </Item35>
+      <Item36>
         <Filename Value="dtanaloggauge.pp"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="DTAnalogGauge"/>
-      </Item37>
-      <Item38>
+      </Item36>
+      <Item37>
         <Filename Value="dtthemedclock.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="dtthemedclock"/>
-      </Item38>
-      <Item39>
+      </Item37>
+      <Item38>
         <Filename Value="dtthemedgauge.pp"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="dtthemedgauge"/>
-      </Item39>
-      <Item40>
-        <Filename Value="upsi_bgrapascalscript.pas"/>
-        <HasRegisterProc Value="True"/>
-        <UnitName Value="uPSI_BGRAPascalScript"/>
-      </Item40>
-      <Item41>
+      </Item38>
+      <Item39>
         <Filename Value="mouseandkeyinput/mouseandkeyinput.pas"/>
         <UnitName Value="MouseAndKeyInput"/>
-      </Item41>
-      <Item42>
+      </Item39>
+      <Item40>
         <Filename Value="bckeyboard.pas"/>
         <HasRegisterProc Value="True"/>
         <UnitName Value="BCKeyboard"/>
-      </Item42>
+      </Item40>
     </Files>
-    <RequiredPkgs Count="4">
+    <RequiredPkgs Count="2">
       <Item1>
-        <PackageName Value="customdrawn"/>
+        <PackageName Value="BGRABitmapPack"/>
       </Item1>
       <Item2>
-        <PackageName Value="BGRABitmapPack"/>
-      </Item2>
-      <Item3>
-        <PackageName Value="pascalscript"/>
-      </Item3>
-      <Item4>
         <PackageName Value="IDEIntf"/>
-      </Item4>
+      </Item2>
     </RequiredPkgs>
     <UsageOptions>
       <UnitPath Value="$(PkgOutDir)"/>

bgracontrols.pas

@@ -13,11 +13,10 @@ uses
   BCNumericKeyboard, BCPanel, BCRadialProgressBar, BCRTTI, BCSamples, 
   BCStylesForm, BCThemeManager, BCToolBar, BCTools, BCTrackbarUpdown, 
   BGRACustomDrawn, BGRAFlashProgressBar, BGRAGraphicControl, BGRAImageList, 
-  BGRAImageManipulation, BGRAKnob, BGRAPascalScript, BGRAResizeSpeedButton, 
-  BGRAScript, BGRAShape, BGRASpeedButton, BGRASpriteAnimation, 
-  BGRAVirtualScreen, DTAnalogClock, DTAnalogCommon, DTAnalogGauge, 
-  dtthemedclock, dtthemedgauge, uPSI_BGRAPascalScript, MouseAndKeyInput, 
-  BCKeyboard, LazarusPackageIntf;
+  BGRAImageManipulation, BGRAKnob, BGRAResizeSpeedButton, BGRAScript, 
+  BGRAShape, BGRASpeedButton, BGRASpriteAnimation, BGRAVirtualScreen, 
+  DTAnalogClock, DTAnalogCommon, DTAnalogGauge, dtthemedclock, dtthemedgauge, 
+  MouseAndKeyInput, BCKeyboard, LazarusPackageIntf;
 
 implementation
 
@@ -50,7 +49,6 @@ begin
   RegisterUnit('DTAnalogGauge', @DTAnalogGauge.Register);
   RegisterUnit('dtthemedclock', @dtthemedclock.Register);
   RegisterUnit('dtthemedgauge', @dtthemedgauge.Register);
-  RegisterUnit('uPSI_BGRAPascalScript', @uPSI_BGRAPascalScript.Register);
   RegisterUnit('BCKeyboard', @BCKeyboard.Register);
 end;
 

bgrapascalscriptcomponent.pas

@@ -0,0 +1,22 @@
+{ This file was automatically created by Lazarus. Do not edit!
+  This source is only used to compile and install the package.
+ }
+
+unit bgrapascalscriptcomponent;
+
+{$warn 5023 off : no warning about unused units}
+interface
+
+uses
+  BGRAPascalScript, uPSI_BGRAPascalScript, LazarusPackageIntf;
+
+implementation
+
+procedure Register;
+begin
+  RegisterUnit('uPSI_BGRAPascalScript', @uPSI_BGRAPascalScript.Register);
+end;
+
+initialization
+  RegisterPackage('bgrapascalscriptcomponent', @Register);
+end.