Fix offset number current query while executing a query batch.

This commit is contained in:
Ansgar Becker
2010-05-21 06:02:50 +00:00
parent 336f991bc2
commit 779b08bdc8

View File

@@ -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;