added UCommon ( in classes ) for lazarus...

common functions needed for lazarus ( and others ) can be put in here.

also this now compiles on lazarus.. 
( dosnt link yet... but I dont get any critical compiler errors )

tested to compile in my delphi, and basic functionality is fine.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@395 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 177 insertions, 212 deletions

diff --git a/Game/Code/UltraStar.lpi b/Game/Code/UltraStar.lpi
index 43d4cd5c..519db01f 100644
--- a/Game/Code/UltraStar.lpi
+++ b/Game/Code/UltraStar.lpi
@@ -12,7 +12,7 @@
       <MainUnit Value="0"/>

       <IconPath Value="./"/>

       <TargetFileExt Value=".exe"/>

-      <ActiveEditorIndexAtStart Value="3"/>

+      <ActiveEditorIndexAtStart Value="9"/>

     </General>

     <VersionInfo>

       <ProjectVersion Value=""/>

@@ -31,14 +31,22 @@
         <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>

       </local>

     </RunParams>

-    <Units Count="43">

+    <RequiredPackages Count="2">

+      <Item1>

+        <PackageName Value="ImagesForLazarus"/>

+      </Item1>

+      <Item2>

+        <PackageName Value="JPEGForLazarus"/>

+      </Item2>

+    </RequiredPackages>

+    <Units Count="49">

       <Unit0>

         <Filename Value="UltraStar.lpr"/>

         <IsPartOfProject Value="True"/>

-        <CursorPos X="6" Y="70"/>

-        <TopLine Value="50"/>

+        <CursorPos X="1" Y="1"/>

+        <TopLine Value="1"/>

         <EditorIndex Value="0"/>

-        <UsageCount Value="22"/>

+        <UsageCount Value="67"/>

         <Loaded Value="True"/>

       </Unit0>

       <Unit1>

@@ -46,22 +54,25 @@
         <UnitName Value="opengl12"/>

         <CursorPos X="2" Y="256"/>

         <TopLine Value="236"/>

-        <UsageCount Value="11"/>

+        <UsageCount Value="7"/>

       </Unit1>

       <Unit2>

         <Filename Value="Classes\UTexture.pas"/>

         <UnitName Value="UTexture"/>

-        <CursorPos X="1" Y="20"/>

-        <TopLine Value="1"/>

-        <UsageCount Value="11"/>

+        <CursorPos X="52" Y="874"/>

+        <TopLine Value="870"/>

+        <UsageCount Value="10"/>

+        <Bookmarks Count="1">

+          <Item0 X="29" Y="203" ID="1"/>

+        </Bookmarks>

       </Unit2>

       <Unit3>

         <Filename Value="Classes\UCommandLine.pas"/>

         <UnitName Value="UCommandLine"/>

         <CursorPos X="1" Y="1"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="7"/>

-        <UsageCount Value="11"/>

+        <EditorIndex Value="24"/>

+        <UsageCount Value="34"/>

         <Loaded Value="True"/>

       </Unit3>

       <Unit4>

@@ -69,183 +80,206 @@
         <UnitName Value="UIni"/>

         <CursorPos X="9" Y="7"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="1"/>

-        <UsageCount Value="11"/>

+        <EditorIndex Value="13"/>

+        <UsageCount Value="34"/>

         <Loaded Value="True"/>

       </Unit4>

       <Unit5>

         <Filename Value="Classes\ULog.pas"/>

         <UnitName Value="ULog"/>

-        <CursorPos X="1" Y="1"/>

+        <CursorPos X="9" Y="7"/>

         <TopLine Value="1"/>

-        <UsageCount Value="11"/>

+        <EditorIndex Value="8"/>

+        <UsageCount Value="10"/>

+        <Loaded Value="True"/>

       </Unit5>

       <Unit6>

         <Filename Value="Classes\UFiles.pas"/>

         <UnitName Value="UFiles"/>

-        <CursorPos X="1" Y="38"/>

-        <TopLine Value="1"/>

+        <CursorPos X="1" Y="512"/>

+        <TopLine Value="492"/>

+        <EditorIndex Value="5"/>

         <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit6>

       <Unit7>

         <Filename Value="Classes\USongs.pas"/>

         <UnitName Value="USongs"/>

         <CursorPos X="57" Y="115"/>

         <TopLine Value="91"/>

-        <UsageCount Value="11"/>

+        <UsageCount Value="7"/>

       </Unit7>

       <Unit8>

         <Filename Value="..\..\..\..\..\lazarus\fpc\2.0.4\source\rtl\objpas\sysutils\sysinth.inc"/>

         <CursorPos X="3" Y="95"/>

         <TopLine Value="75"/>

-        <UsageCount Value="10"/>

+        <UsageCount Value="6"/>

       </Unit8>

       <Unit9>

         <Filename Value="Classes\UMain.pas"/>

         <UnitName Value="UMain"/>

-        <CursorPos X="1" Y="1"/>

+        <CursorPos X="5" Y="9"/>

         <TopLine Value="1"/>

+        <EditorIndex Value="10"/>

         <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit9>

       <Unit10>

         <Filename Value="Classes\UGraphic.pas"/>

         <UnitName Value="UGraphic"/>

         <CursorPos X="3" Y="56"/>

         <TopLine Value="19"/>

-        <EditorIndex Value="8"/>

-        <UsageCount Value="11"/>

+        <EditorIndex Value="25"/>

+        <UsageCount Value="34"/>

         <Loaded Value="True"/>

       </Unit10>

       <Unit11>

         <Filename Value="Classes\UThemes.pas"/>

         <UnitName Value="UThemes"/>

-        <CursorPos X="24" Y="379"/>

-        <TopLine Value="359"/>

-        <UsageCount Value="11"/>

+        <CursorPos X="37" Y="165"/>

+        <TopLine Value="139"/>

+        <EditorIndex Value="9"/>

+        <UsageCount Value="10"/>

+        <Loaded Value="True"/>

       </Unit11>

       <Unit12>

         <Filename Value="Classes\UCovers.pas"/>

         <UnitName Value="UCovers"/>

-        <CursorPos X="14" Y="11"/>

+        <CursorPos X="12" Y="7"/>

         <TopLine Value="1"/>

+        <EditorIndex Value="3"/>

         <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit12>

       <Unit13>

         <Filename Value="Classes\UMusic.pas"/>

         <UnitName Value="UMusic"/>

-        <CursorPos X="1" Y="1"/>

-        <TopLine Value="1"/>

+        <CursorPos X="46" Y="219"/>

+        <TopLine Value="198"/>

+        <EditorIndex Value="7"/>

         <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit13>

       <Unit14>

         <Filename Value="Classes\ULyrics.pas"/>

         <UnitName Value="ULyrics"/>

         <CursorPos X="1" Y="1"/>

         <TopLine Value="1"/>

-        <UsageCount Value="11"/>

+        <UsageCount Value="7"/>

       </Unit14>

       <Unit15>

         <Filename Value="Screens\UScreenLoading.pas"/>

         <UnitName Value="UScreenLoading"/>

         <CursorPos X="8" Y="6"/>

         <TopLine Value="1"/>

-        <UsageCount Value="11"/>

+        <UsageCount Value="7"/>

       </Unit15>

       <Unit16>

         <Filename Value="Menu\UMenu.pas"/>

         <UnitName Value="UMenu"/>

-        <CursorPos X="9" Y="7"/>

+        <CursorPos X="1" Y="8"/>

         <TopLine Value="1"/>

+        <EditorIndex Value="12"/>

         <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit16>

       <Unit17>

         <Filename Value="Menu\UMenuText.pas"/>

         <UnitName Value="UMenuText"/>

         <CursorPos X="1" Y="8"/>

         <TopLine Value="1"/>

-        <UsageCount Value="11"/>

+        <UsageCount Value="7"/>

       </Unit17>

       <Unit18>

         <Filename Value="Menu\UMenuSelectSlide.pas"/>

         <UnitName Value="UMenuSelectSlide"/>

         <CursorPos X="6" Y="12"/>

         <TopLine Value="2"/>

-        <UsageCount Value="10"/>

+        <UsageCount Value="6"/>

       </Unit18>

       <Unit19>

         <Filename Value="Screens\UScreenMain.pas"/>

         <UnitName Value="UScreenMain"/>

         <CursorPos X="3" Y="14"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="4"/>

-        <UsageCount Value="10"/>

-        <Bookmarks Count="1">

-          <Item0 X="6" Y="43" ID="1"/>

-        </Bookmarks>

+        <EditorIndex Value="21"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit19>

       <Unit20>

         <Filename Value="Menu\UDisplay.pas"/>

         <UnitName Value="UDisplay"/>

-        <CursorPos X="1" Y="60"/>

-        <TopLine Value="35"/>

-        <UsageCount Value="10"/>

+        <CursorPos X="29" Y="410"/>

+        <TopLine Value="390"/>

+        <EditorIndex Value="6"/>

+        <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit20>

       <Unit21>

         <Filename Value="Classes\ULight.pas"/>

         <UnitName Value="ULight"/>

         <CursorPos X="81" Y="55"/>

         <TopLine Value="51"/>

-        <UsageCount Value="10"/>

+        <UsageCount Value="6"/>

       </Unit21>

       <Unit22>

         <Filename Value="Screens\UScreenSing.pas"/>

         <UnitName Value="UScreenSing"/>

-        <CursorPos X="65" Y="6"/>

+        <CursorPos X="40" Y="21"/>

         <TopLine Value="1"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="19"/>

+        <UsageCount Value="12"/>

+        <Loaded Value="True"/>

       </Unit22>

       <Unit23>

         <Filename Value="Classes\UVideo.pas"/>

         <UnitName Value="UVideo"/>

-        <CursorPos X="9" Y="10"/>

-        <TopLine Value="1"/>

-        <UsageCount Value="10"/>

+        <CursorPos X="1" Y="8"/>

+        <TopLine Value="2"/>

+        <EditorIndex Value="20"/>

+        <UsageCount Value="12"/>

+        <Loaded Value="True"/>

       </Unit23>

       <Unit24>

         <Filename Value="Screens\UScreenScore.pas"/>

         <UnitName Value="UScreenScore"/>

-        <CursorPos X="1" Y="1"/>

+        <CursorPos X="9" Y="7"/>

         <TopLine Value="1"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="18"/>

+        <UsageCount Value="12"/>

+        <Loaded Value="True"/>

       </Unit24>

       <Unit25>

         <Filename Value="Screens\UScreenEditSub.pas"/>

         <UnitName Value="UScreenEditSub"/>

-        <CursorPos X="19" Y="545"/>

-        <TopLine Value="505"/>

-        <UsageCount Value="10"/>

+        <CursorPos X="11" Y="1339"/>

+        <TopLine Value="1330"/>

+        <EditorIndex Value="16"/>

+        <UsageCount Value="12"/>

+        <Loaded Value="True"/>

       </Unit25>

       <Unit26>

         <Filename Value="switches.inc"/>

         <CursorPos X="10" Y="3"/>

         <TopLine Value="1"/>

-        <UsageCount Value="10"/>

+        <UsageCount Value="6"/>

       </Unit26>

       <Unit27>

         <Filename Value="lib\midi\Midiout.pas"/>

         <UnitName Value="MidiOut"/>

-        <CursorPos X="110" Y="20"/>

+        <CursorPos X="1" Y="1"/>

         <TopLine Value="1"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="2"/>

+        <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit27>

       <Unit28>

         <Filename Value="Screens\UScreenEditConvert.pas"/>

         <UnitName Value="UScreenEditConvert"/>

-        <CursorPos X="48" Y="356"/>

-        <TopLine Value="336"/>

-        <EditorIndex Value="3"/>

-        <UsageCount Value="10"/>

+        <CursorPos X="23" Y="563"/>

+        <TopLine Value="537"/>

+        <EditorIndex Value="15"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit28>

       <Unit29>

@@ -253,17 +287,17 @@
         <UnitName Value="UScreenSingModi"/>

         <CursorPos X="6" Y="26"/>

         <TopLine Value="6"/>

-        <EditorIndex Value="6"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="23"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit29>

       <Unit30>

         <Filename Value="Screens\UScreenCredits.pas"/>

         <UnitName Value="UScreenCredits"/>

-        <CursorPos X="64" Y="119"/>

-        <TopLine Value="96"/>

-        <EditorIndex Value="11"/>

-        <UsageCount Value="10"/>

+        <CursorPos X="1" Y="1"/>

+        <TopLine Value="1"/>

+        <EditorIndex Value="28"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit30>

       <Unit31>

@@ -271,23 +305,25 @@
         <UnitName Value="URecord"/>

         <CursorPos X="1" Y="1"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="18"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="36"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit31>

       <Unit32>

         <Filename Value="lib\JEDI-SDLv1.0\SDL\Pas\jedi-sdl.inc"/>

         <CursorPos X="4" Y="237"/>

         <TopLine Value="217"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="11"/>

+        <UsageCount Value="11"/>

+        <Loaded Value="True"/>

       </Unit32>

       <Unit33>

         <Filename Value="..\..\Modis\SDK\ModiSDK.pas"/>

         <UnitName Value="ModiSDK"/>

         <CursorPos X="41" Y="8"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="5"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="22"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit33>

       <Unit34>

@@ -295,8 +331,8 @@
         <UnitName Value="UDLLManager"/>

         <CursorPos X="12" Y="5"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="9"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="26"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit34>

       <Unit35>

@@ -304,8 +340,8 @@
         <UnitName Value="UPlaylist"/>

         <CursorPos X="1" Y="1"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="10"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="27"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit35>

       <Unit36>

@@ -313,8 +349,8 @@
         <UnitName Value="UDataBase"/>

         <CursorPos X="1" Y="8"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="17"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="35"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit36>

       <Unit37>

@@ -322,8 +358,8 @@
         <UnitName Value="UScreenStatMain"/>

         <CursorPos X="1" Y="8"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="12"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="29"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit37>

       <Unit38>

@@ -331,8 +367,8 @@
         <UnitName Value="UScreenPartyOptions"/>

         <CursorPos X="42" Y="233"/>

         <TopLine Value="213"/>

-        <EditorIndex Value="13"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="30"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit38>

       <Unit39>

@@ -340,8 +376,8 @@
         <UnitName Value="UScreenPartyNewRound"/>

         <CursorPos X="5" Y="422"/>

         <TopLine Value="382"/>

-        <EditorIndex Value="14"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="31"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit39>

       <Unit40>

@@ -349,151 +385,80 @@
         <UnitName Value="UParty"/>

         <CursorPos X="1" Y="8"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="15"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="32"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit40>

       <Unit41>

         <Filename Value="Classes\UDraw.pas"/>

         <UnitName Value="UDraw"/>

-        <CursorPos X="22" Y="11"/>

+        <CursorPos X="1" Y="1"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="16"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="33"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit41>

       <Unit42>

         <Filename Value="Screens\UScreenSongMenu.pas"/>

         <UnitName Value="UScreenSongMenu"/>

-        <CursorPos X="9" Y="7"/>

+        <CursorPos X="1" Y="5"/>

         <TopLine Value="1"/>

-        <EditorIndex Value="2"/>

-        <UsageCount Value="10"/>

+        <EditorIndex Value="14"/>

+        <UsageCount Value="33"/>

         <Loaded Value="True"/>

       </Unit42>

+      <Unit43>

+        <Filename Value="Screens\UScreenTop5.pas"/>

+        <UnitName Value="UScreenTop5"/>

+        <CursorPos X="1" Y="1"/>

+        <TopLine Value="1"/>

+        <EditorIndex Value="17"/>

+        <UsageCount Value="12"/>

+        <Loaded Value="True"/>

+      </Unit43>

+      <Unit44>

+        <Filename Value="Classes\UGraphicClasses.pas"/>

+        <UnitName Value="UGraphicClasses"/>

+        <CursorPos X="1" Y="1"/>

+        <TopLine Value="1"/>

+        <EditorIndex Value="34"/>

+        <UsageCount Value="12"/>

+        <Loaded Value="True"/>

+      </Unit44>

+      <Unit45>

+        <Filename Value="Screens\UScreenSong.pas"/>

+        <UnitName Value="UScreenSong"/>

+        <CursorPos X="13" Y="1162"/>

+        <TopLine Value="1135"/>

+        <EditorIndex Value="4"/>

+        <UsageCount Value="11"/>

+        <Loaded Value="True"/>

+      </Unit45>

+      <Unit46>

+        <Filename Value="lib\midi\DELPHMCB.PAS"/>

+        <UnitName Value="Delphmcb"/>

+        <CursorPos X="1" Y="1"/>

+        <TopLine Value="1"/>

+        <UsageCount Value="10"/>

+      </Unit46>

+      <Unit47>

+        <Filename Value="Classes\UCommon.pas"/>

+        <UnitName Value="UCommon"/>

+        <CursorPos X="55" Y="22"/>

+        <TopLine Value="7"/>

+        <EditorIndex Value="1"/>

+        <UsageCount Value="10"/>

+        <Loaded Value="True"/>

+      </Unit47>

+      <Unit48>

+        <Filename Value="..\..\..\..\..\lazarus\fpc\2.0.4\source\rtl\objpas\math.pp"/>

+        <UnitName Value="math"/>

+        <CursorPos X="1" Y="1041"/>

+        <TopLine Value="1036"/>

+        <UsageCount Value="10"/>

+      </Unit48>

     </Units>

-    <JumpHistory Count="30" HistoryIndex="29">

-      <Position1>

-        <Filename Value="Screens\UScreenPartyNewRound.pas"/>

-        <Caret Line="11" Column="51" TopLine="1"/>

-      </Position1>

-      <Position2>

-        <Filename Value="Classes\UParty.pas"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position2>

-      <Position3>

-        <Filename Value="Classes\UParty.pas"/>

-        <Caret Line="322" Column="33" TopLine="297"/>

-      </Position3>

-      <Position4>

-        <Filename Value="Classes\UParty.pas"/>

-        <Caret Line="294" Column="3" TopLine="274"/>

-      </Position4>

-      <Position5>

-        <Filename Value="Classes\UDraw.pas"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position5>

-      <Position6>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position6>

-      <Position7>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="1110" Column="1" TopLine="1070"/>

-      </Position7>

-      <Position8>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="152" Column="33" TopLine="681"/>

-      </Position8>

-      <Position9>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position9>

-      <Position10>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="165" Column="18" TopLine="139"/>

-      </Position10>

-      <Position11>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="9" Column="9" TopLine="1"/>

-      </Position11>

-      <Position12>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="7" Column="9" TopLine="1"/>

-      </Position12>

-      <Position13>

-        <Filename Value="Screens\UScreenSingModi.pas"/>

-        <Caret Line="176" Column="52" TopLine="156"/>

-      </Position13>

-      <Position14>

-        <Filename Value="UltraStar.lpr"/>

-        <Caret Line="106" Column="34" TopLine="86"/>

-      </Position14>

-      <Position15>

-        <Filename Value="UltraStar.lpr"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position15>

-      <Position16>

-        <Filename Value="UltraStar.lpr"/>

-        <Caret Line="70" Column="6" TopLine="50"/>

-      </Position16>

-      <Position17>

-        <Filename Value="Screens\UScreenSongMenu.pas"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position17>

-      <Position18>

-        <Filename Value="Screens\UScreenSongMenu.pas"/>

-        <Caret Line="166" Column="71" TopLine="146"/>

-      </Position18>

-      <Position19>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="1" Column="1" TopLine="1"/>

-      </Position19>

-      <Position20>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="118" Column="14" TopLine="86"/>

-      </Position20>

-      <Position21>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="137" Column="21" TopLine="113"/>

-      </Position21>

-      <Position22>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="144" Column="21" TopLine="122"/>

-      </Position22>

-      <Position23>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="147" Column="38" TopLine="127"/>

-      </Position23>

-      <Position24>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="148" Column="50" TopLine="128"/>

-      </Position24>

-      <Position25>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="151" Column="21" TopLine="131"/>

-      </Position25>

-      <Position26>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="169" Column="34" TopLine="149"/>

-      </Position26>

-      <Position27>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="171" Column="48" TopLine="151"/>

-      </Position27>

-      <Position28>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="356" Column="38" TopLine="336"/>

-      </Position28>

-      <Position29>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="393" Column="11" TopLine="371"/>

-      </Position29>

-      <Position30>

-        <Filename Value="Screens\UScreenEditConvert.pas"/>

-        <Caret Line="409" Column="28" TopLine="433"/>

-      </Position30>

-    </JumpHistory>

+    <JumpHistory Count="0" HistoryIndex="-1"/>

   </ProjectOptions>

   <CompilerOptions>

     <Version Value="5"/>