summaryrefslogtreecommitdiff
path: root/fhunit.pas
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2022-04-08 17:13:48 +0200
committerErich Eckner <git@eckner.net>2022-04-08 17:13:48 +0200
commit8df5418fcf2caa0613f6c4ccc694b5fb43f9ef1d (patch)
tree97a168668e6bf96d8ead1b37fd557ede209bf551 /fhunit.pas
parent2b5655310c9f94d751788e9a35e7aab3729e492e (diff)
downloadFH-Wetter-8df5418fcf2caa0613f6c4ccc694b5fb43f9ef1d.tar.xz
fix parsing
Diffstat (limited to 'fhunit.pas')
-rw-r--r--fhunit.pas10
1 files changed, 8 insertions, 2 deletions
diff --git a/fhunit.pas b/fhunit.pas
index 176cf68..9078d96 100644
--- a/fhunit.pas
+++ b/fhunit.pas
@@ -112,6 +112,9 @@ const
monatsNamen: array[1..12] of string =
('Januar','Februar','M'#$e4'rz','April','Mai','Juni','Juli',
'August','September','Oktober','November','Dezember');
+ monatsNamen_: array[1..12] of string =
+ ('Januar','Februar','M%E4rz','April','Mai','Juni','Juli',
+ 'August','September','Oktober','November','Dezember');
farben: array[tMessGroesze] of tColor =
($0000DF,$CFAF7F,$007FFF,$FF00FF,$FFAF3F,$3FAFAF,$AFAFAF);
@@ -210,7 +213,10 @@ begin
istZahl:=istZahl and (t[i] in ['0'..'9','.',',','-']);
if not istZahl then
exit;
- _mW[mG]:=strtofloat(t);
+ if (t='--') and (mG=mgGlobalstrahlung) then
+ _mW[mG]:=0
+ else
+ _mW[mG]:=strtofloat(t);
end;
setzeUZeit;
end;
@@ -418,7 +424,7 @@ begin
uZeit2mZeit(nZeit,mZeit);
ladeProzess.parameters.add(
'tag='+inttostr(mZeit[zgTag])+'&'+
- 'monat='+Monatsnamen[mZeit[zgMonat]]+'&'+
+ 'monat='+Monatsnamen_[mZeit[zgMonat]]+'&'+
'jahr='+inttostr(mZeit[zgJahr])+'&'+
'stunde='+inttostr(mZeit[zgStunde])+'&'+
'minute='+inttostr(10*mZeit[zgMin10])+'&'+