From 779b08bdc8275f24b537bd66927d703e72dd7c12 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Fri, 21 May 2010 06:02:50 +0000 Subject: [PATCH] Fix offset number current query while executing a query batch. --- source/main.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/main.pas b/source/main.pas index 484cfdbc..962e9f3d 100644 --- a/source/main.pas +++ b/source/main.pas @@ -2035,7 +2035,7 @@ begin Results.Connection := Connection; Results.LogCategory := lcUserFiredSQL; for i:=0 to SQLBatch.Count-1 do begin - ShowStatusMsg('Executing query #'+FormatNumber(i)+' of '+FormatNumber(SQLBatch.Count)+' ...'); + ShowStatusMsg('Executing query #'+FormatNumber(i+1)+' of '+FormatNumber(SQLBatch.Count)+' ...'); ProgressBarStatus.StepIt; ProgressBarStatus.Repaint; Results.SQL := SQLBatch[i].SQL;