diff options
Diffstat (limited to 'pegelunit.pas')
-rw-r--r-- | pegelunit.pas | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/pegelunit.pas b/pegelunit.pas index d5fd5a5..bfa1d6b 100644 --- a/pegelunit.pas +++ b/pegelunit.pas @@ -525,10 +525,7 @@ begin exit; end; - if rightStr(von,3)='.gz' then - loadFromGz(von,pt,len) - else - loadFromFile(von,pt,len); + loadFromGeneric(von,pt,len); if pLongint(pt)^ <> 314159265 then begin // magische Zahl nicht gefunden -> Rückfallebene: Text! sl:=tMyStringList.create; @@ -618,10 +615,7 @@ begin werte[ps].dump(pt+i); i:=i+werte[ps].size; end; - if rightStr(nach,3)='.gz' then - saveToGz(nach,pt,len) - else - saveToFile(nach,pt,len); + saveToGeneric(nach,pt,len); freemem(pt); end; end; |