fix: query batch stops at second last query if it has errors but StopOnErrors is off

ansgarbecker · ansgarbecker · commit 6e40c6270ffc · 2025-12-05T13:46:28.000+01:00
Refs #2317
diff --git a/source/apphelpers.pas b/source/apphelpers.pas
@@ -3262,7 +3262,7 @@ procedure TQueryThread.Execute;
       Inc(FWarningCount, FConnection.WarningCount);
     except
       on E:EDbError do begin
-        if FStopOnErrors or (i = FBatch.Count - 1) then begin
+        if FStopOnErrors or (i = FBatch.Count) then begin
           FErrorMessage := E.Message;
           ErrorAborted := True;
         end;
