diff options
Diffstat (limited to 'epostunit.pas')
| -rw-r--r-- | epostunit.pas | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/epostunit.pas b/epostunit.pas index 39decce..8789aa0 100644 --- a/epostunit.pas +++ b/epostunit.pas @@ -6081,7 +6081,7 @@ end; function tWerte.erzeugeLinearesBild(sT: boolean; var f: tMyStringList; threads: longint): boolean; var - s,datei,achsenDatei: string; + s,t,datei,achsenDatei: string; i,j,k,schriftgroesze: longint; xZoom,yZoom,wert,schritt,miW,maW,Zeit, xp0,tp0: extended; @@ -6324,10 +6324,11 @@ begin end; while s<>'' do begin setLength(verwKonturen,length(verwKonturen)+1); - i:=findeKontur(erstesArgument(s),nil,wertes,konturen,false); + t:=erstesArgument(s); + i:=findeKontur(t,nil,wertes,konturen,false); if (i<0) or (i>=length(konturen^)) then begin bekannteBefehle.sort; - gibAus('Die Kontur '''+s+''' gibt es nicht!'#10+bekannteBefehle.text,3); + gibAus('Die Kontur '''+t+''' gibt es nicht!'#10'Ansonsten kenne ich noch die Befehle:'#10+bekannteBefehle.text,3); aufraeumen; exit; end; |