From 0beff7774da29b17d1f4e1eafeee2557b911992a Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Wed, 30 Mar 2016 16:04:07 +0200 Subject: Fehlermeldung bzgl. einzufügenden Koordinaten in erzeugeAscii verbessert in epostunit.pas MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- epostunit.pas | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/epostunit.pas b/epostunit.pas index ff533cf..2dc9bf6 100644 --- a/epostunit.pas +++ b/epostunit.pas @@ -3876,9 +3876,13 @@ begin tmax:=kont2disk('t',exprtofloat(st,s)); continue; end; - if (s='Koordinaten einfügen') and ((_xsteps=1) or (_tsiz=1)) then begin - mitKoordinaten:=byte(_xsteps=1)*2 + byte(_tsiz=1); - continue; + if s='Koordinaten einfügen' then begin + if (_xsteps=1) or (_tsiz=1) then begin + mitKoordinaten:=byte(_xsteps=1)*2 + byte(_tsiz=1); + continue; + end; + gibAus('Kann Koordinaten nicht in mehrdimensionale Daten einfügen!',3); + exit; end; if startetMit('Separator:',s) then begin if s='Leerzeichen' then begin -- cgit v1.2.3-70-g09d2