From 355c60f9af089166acf4547d9ca3fa219a713e1d Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Fri, 29 Jan 2016 08:47:43 +0100
Subject: freies Editieren fängt nun ungültige Zahlen ab
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 unit2.pas | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/unit2.pas b/unit2.pas
index eb2f2b6..454d30a 100644
--- a/unit2.pas
+++ b/unit2.pas
@@ -522,7 +522,12 @@ begin
         break;
       end;
       setlength(tmpVals,length(tmpVals)+1);
-      tmpVals[length(tmpVals)-1]:=strToScientific(leftStr(_cs[i],length(_cs[i])-1));
+      try
+        tmpVals[length(tmpVals)-1]:=strToScientific(leftStr(_cs[i],length(_cs[i])-1));
+      except
+        setlength(tmpVals,length(tmpVals)-1);
+        continue;
+      end;
       acs.add(tmpVals[length(tmpVals)-1],1);
     end;
   if length(tmpVals)<ordnung then begin
-- 
cgit v1.2.3-54-g00ecf