diff options
| -rw-r--r-- | pegelunit.pas | 26 | ||||
| -rw-r--r-- | wetter.lps | 10 |
2 files changed, 18 insertions, 18 deletions
diff --git a/pegelunit.pas b/pegelunit.pas index bfa1d6b..77fb546 100644 --- a/pegelunit.pas +++ b/pegelunit.pas @@ -92,19 +92,19 @@ implementation uses math, unit1, myStringListUnit, fileUnit; const - pegelStationsNamen: array[tPegelstation] of array[0..1] of string = - (('Blankenstein','Blankenstein-Ros.'), - ('Kaulsdorf',''), - ('Saalfeld-Remschütz',''), - ('Rudolstadt',''), - ('Rothenstein',''), - ('Camburg-Stöben',''), - ('Möschlitz',''), - ('Probstzella',''), - ('Kaulsdorf-Eichicht',''), - ('Katzhütte',''), - ('Schwarzburg',''), - ('Freienorla','')); + pegelStationsNamen: array[tPegelstation] of array[0..2] of string = + (('Blankenstein','Blankenstein-Ros.','Blankenstein-Rosenthal'), + ('Kaulsdorf','',''), + ('Saalfeld-Remschütz','',''), + ('Rudolstadt','',''), + ('Rothenstein','',''), + ('Camburg-Stöben','',''), + ('Möschlitz','',''), + ('Probstzella','',''), + ('Kaulsdorf-Eichicht','',''), + ('Katzhütte','',''), + ('Schwarzburg','',''), + ('Freienorla','','')); pegelStationsNummern: array[tPegelstation] of extended = (57021,57025,57026,57027,57028,57033,57170,57200,57201,57211,57211.5,57240); pegelGrenzen: array[tPegelstation,0..3] of longint = @@ -18,8 +18,7 @@ <HasResources Value="True"/> <ResourceBaseClass Value="Form"/> <UnitName Value="Unit1"/> - <IsVisibleTab Value="True"/> - <TopLine Value="194"/> + <TopLine Value="280"/> <CursorPos X="26" Y="201"/> <UsageCount Value="59"/> <Loaded Value="True"/> @@ -58,9 +57,10 @@ </Unit5> <Unit6> <Filename Value="pegelunit.pas"/> + <IsVisibleTab Value="True"/> <EditorIndex Value="5"/> - <TopLine Value="567"/> - <CursorPos X="27" Y="578"/> + <TopLine Value="478"/> + <CursorPos X="64" Y="508"/> <UsageCount Value="28"/> <Loaded Value="True"/> </Unit6> @@ -134,7 +134,7 @@ <Filename Value="../units/gitupdateunit.pas"/> <EditorIndex Value="1"/> <TopLine Value="48"/> - <CursorPos X="17" Y="87"/> + <CursorPos X="17" Y="49"/> <UsageCount Value="10"/> <Loaded Value="True"/> </Unit16> |