diff options
| author | Erich Eckner <git@eckner.net> | 2016-01-02 20:31:08 +0100 |
|---|---|---|
| committer | Erich Eckner <git@eckner.net> | 2016-01-02 20:31:08 +0100 |
| commit | f6e3bbf4cdbc0b8e46fae8fa31df5d4f83a73a75 (patch) | |
| tree | bb42593f3e1feb9e6c4330e801e32a781d306871 | |
| parent | 22a0a9ed48095c4da42d3d20b5d80ffe16aab30b (diff) | |
| download | FH-Wetter-f6e3bbf4cdbc0b8e46fae8fa31df5d4f83a73a75.tar.xz | |
Blankenstein-Rosenthal als Bezeichner neu
| -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> |