From 6e51ec194a8a789c81dccb407b0825243185f48b Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Thu, 23 Jul 2015 12:43:54 +0200
Subject: etwas ausfuehrlichere Fehlermeldungen bei Pruefsummendateifehlern
 eingebaut

---
 Make     | Bin 1549552 -> 1550296 bytes
 Make.lpr |  10 ++++++++--
 Make.lps |  11 +++++------
 3 files changed, 13 insertions(+), 8 deletions(-)

diff --git a/Make b/Make
index d186f18..9efe5ad 100755
Binary files a/Make and b/Make differ
diff --git a/Make.lpr b/Make.lpr
index c69a64a..0f2b51c 100644
--- a/Make.lpr
+++ b/Make.lpr
@@ -256,15 +256,20 @@ var f:            textfile;
     gefunden,gut: boolean;
 begin
   result:=false;
-  if sumNam='' then exit;
+  if sumNam='' then begin
+    writeln('Leerer Name als Summendatei angegeben!');
+    exit;
+  end;
 
   if not fileexists(sumNam) then begin
     assignfile(f,sumNam);
     rewrite(f);
     closefile(f);
   end;
-  if not fileexists(sumNam) then
+  if not fileexists(sumNam) then begin
+    writeln('Ich bin nicht in der lage die bisher nicht existierende Date '''+sumNam+''' anzulegen!');
     exit;
+  end;
 
   gutschlecht:=testeSummen(sumNam);
 
@@ -291,6 +296,7 @@ begin
           dats[length(dats)-1]^.Datum:=0; // siehe oben
           continue;
         end;
+        writeln('In der Summendatei gibt es eine Datei mit gültiger Prüfsumme, die ich nicht finden kann: '''+gutschlecht[gut][i]+'''!');
         for gefunden:=false to true do
           gutschlecht[gefunden].free;
         exit;
diff --git a/Make.lps b/Make.lps
index ea7ea27..0a64b6b 100644
--- a/Make.lps
+++ b/Make.lps
@@ -8,9 +8,9 @@
         <Filename Value="Make.lpr"/>
         <IsPartOfProject Value="True"/>
         <IsVisibleTab Value="True"/>
-        <TopLine Value="663"/>
-        <CursorPos X="65" Y="691"/>
-        <FoldState Value=" T3i70C5 pl5lT0p3 pjLkb0B4132"/>
+        <TopLine Value="46"/>
+        <CursorPos X="6" Y="50"/>
+        <FoldState Value=" T3i70C5 pl5lT0v3 pjLl00B4]I6lR0{R3r"/>
         <UsageCount Value="47"/>
         <Loaded Value="True"/>
       </Unit0>
@@ -26,7 +26,6 @@
         <EditorIndex Value="1"/>
         <TopLine Value="24"/>
         <CursorPos Y="74"/>
-        <FoldState Value=" T3T073 pjbk90D2x"/>
         <UsageCount Value="26"/>
         <Loaded Value="True"/>
       </Unit2>
@@ -171,11 +170,11 @@
       </Position28>
       <Position29>
         <Filename Value="Make.lpr"/>
-        <Caret TopLine="19"/>
+        <Caret Line="111" Column="85" TopLine="88"/>
       </Position29>
       <Position30>
         <Filename Value="Make.lpr"/>
-        <Caret Line="111" Column="85" TopLine="88"/>
+        <Caret Line="617" TopLine="20"/>
       </Position30>
     </JumpHistory>
   </ProjectSession>
-- 
cgit v1.2.3-54-g00ecf