kleine Aufhübschung des Quelltextes

2 files changed, 30 insertions, 33 deletions

diff --git a/epost.lps b/epost.lps
index 0239bdd..8c52cdd 100644
--- a/epost.lps
+++ b/epost.lps
@@ -7,8 +7,8 @@
       <Unit0>
         <Filename Value="epost.lpr"/>
         <IsPartOfProject Value="True"/>
-        <TopLine Value="121"/>
-        <CursorPos X="15" Y="141"/>
+        <IsVisibleTab Value="True"/>
+        <CursorPos X="65" Y="13"/>
         <UsageCount Value="202"/>
         <Loaded Value="True"/>
       </Unit0>
@@ -23,9 +23,7 @@
         <Filename Value="epostunit.pas"/>
         <IsPartOfProject Value="True"/>
         <EditorIndex Value="1"/>
-        <TopLine Value="1470"/>
-        <CursorPos X="33" Y="1515"/>
-        <FoldState Value=" T3pA0D5 piejM078]9XjF0G7[94]IH411 poUwA0;8 T0knZ0{1}"/>
+        <FoldState Value=" T3pA0D5 piejM078]9XjF0G7[94]IH411 T0knZ0{16"/>
         <UsageCount Value="201"/>
         <Loaded Value="True"/>
       </Unit2>
@@ -40,17 +38,15 @@
         <Filename Value="werteunit.pas"/>
         <IsPartOfProject Value="True"/>
         <EditorIndex Value="2"/>
-        <TopLine Value="1078"/>
-        <CursorPos X="3" Y="1112"/>
+        <TopLine Value="25"/>
         <UsageCount Value="200"/>
         <Loaded Value="True"/>
       </Unit4>
       <Unit5>
         <Filename Value="typenunit.pas"/>
         <IsPartOfProject Value="True"/>
-        <EditorIndex Value="4"/>
-        <TopLine Value="942"/>
-        <CursorPos X="97" Y="960"/>
+        <EditorIndex Value="3"/>
+        <TopLine Value="379"/>
         <UsageCount Value="200"/>
         <Loaded Value="True"/>
       </Unit5>
@@ -64,13 +60,15 @@
       <Unit7>
         <Filename Value="../units/mystringlistunit.pas"/>
         <EditorIndex Value="-1"/>
-        <UsageCount Value="19"/>
+        <TopLine Value="273"/>
+        <CursorPos X="32" Y="291"/>
+        <UsageCount Value="20"/>
       </Unit7>
       <Unit8>
         <Filename Value="../units/lowlevelunit.pas"/>
         <EditorIndex Value="-1"/>
-        <TopLine Value="81"/>
-        <CursorPos X="27" Y="105"/>
+        <TopLine Value="744"/>
+        <CursorPos X="39" Y="836"/>
         <UsageCount Value="19"/>
       </Unit8>
       <Unit9>
@@ -81,16 +79,17 @@
       <Unit10>
         <Filename Value="../units/matheunit.pas"/>
         <EditorIndex Value="-1"/>
-        <UsageCount Value="19"/>
+        <TopLine Value="544"/>
+        <CursorPos X="53" Y="567"/>
+        <FoldState Value=" T3q50{m012A"/>
+        <UsageCount Value="20"/>
       </Unit10>
       <Unit11>
         <Filename Value="../units/systemunit.pas"/>
-        <IsVisibleTab Value="True"/>
-        <EditorIndex Value="3"/>
-        <TopLine Value="73"/>
-        <CursorPos X="77" Y="92"/>
-        <UsageCount Value="16"/>
-        <Loaded Value="True"/>
+        <EditorIndex Value="-1"/>
+        <TopLine Value="115"/>
+        <CursorPos Y="155"/>
+        <UsageCount Value="17"/>
       </Unit11>
       <Unit12>
         <Filename Value="../fpGUI/src/corelib/render/software/agg_2D.pas"/>
@@ -102,35 +101,34 @@
     </Units>
     <JumpHistory Count="8" HistoryIndex="7">
       <Position1>
-        <Filename Value="../units/systemunit.pas"/>
-        <Caret Line="125" Column="20" TopLine="85"/>
+        <Filename Value="epostunit.pas"/>
+        <Caret Line="1515" Column="27" TopLine="1458"/>
       </Position1>
       <Position2>
-        <Filename Value="werteunit.pas"/>
-        <Caret Line="1105" Column="170" TopLine="1076"/>
+        <Filename Value="epostunit.pas"/>
+        <Caret Line="1485" Column="69" TopLine="1470"/>
       </Position2>
       <Position3>
-        <Filename Value="werteunit.pas"/>
-        <Caret Line="1105" Column="160" TopLine="1085"/>
+        <Filename Value="epostunit.pas"/>
       </Position3>
       <Position4>
         <Filename Value="werteunit.pas"/>
-        <Caret Line="81" Column="17" TopLine="57"/>
+        <Caret Line="1113" TopLine="1078"/>
       </Position4>
       <Position5>
-        <Filename Value="epostunit.pas"/>
-        <Caret Line="2072" TopLine="2013"/>
+        <Filename Value="typenunit.pas"/>
+        <Caret Line="960" Column="97" TopLine="942"/>
       </Position5>
       <Position6>
         <Filename Value="epostunit.pas"/>
       </Position6>
       <Position7>
-        <Filename Value="epostunit.pas"/>
-        <Caret Line="1515" Column="27" TopLine="1458"/>
+        <Filename Value="epost.lpr"/>
+        <Caret Line="46" Column="58" TopLine="34"/>
       </Position7>
       <Position8>
         <Filename Value="epost.lpr"/>
-        <Caret Line="7" TopLine="106"/>
+        <Caret Line="50" Column="58" TopLine="37"/>
       </Position8>
     </JumpHistory>
   </ProjectSession>
diff --git a/werteunit.pas b/werteunit.pas
index 4b903b5..b1fa1dd 100644
--- a/werteunit.pas
+++ b/werteunit.pas
@@ -1110,7 +1110,6 @@ begin
   setlength(werte,br*ho);
   if (ausgaben and __ausgabenMaske) <> 0 then
     gibAus('... fertig '+timetostr(now-Zeit),ausgaben);
-
 end;
 
 function tLLWerte.zuPixelWerten(whoehe,wbreite,xpmi,xmi,tmi: longint; xz,yz: extended; pPWerte: pTExtendedArray; pPAnzahlen: pTLongintArray): boolean;