From 51c23000f95e3adbf88d2cf1687914bcc45e246f Mon Sep 17 00:00:00 2001
From: rosenfield <rosenfield@40cadd2d-89a2-4482-8f20-0232d845d7e3>
Date: Fri, 9 Nov 2007 07:59:14 +0000
Subject: [PATCH] Correct some code comments.

---
 source/insertfiles_progress.pas | 1 -
 source/mysqlquerythread.pas     | 6 ++----
 2 files changed, 2 insertions(+), 5 deletions(-)

diff --git a/source/insertfiles_progress.pas b/source/insertfiles_progress.pas
index f594800b..9d4e1f00 100644
--- a/source/insertfiles_progress.pas
+++ b/source/insertfiles_progress.pas
@@ -128,7 +128,6 @@ begin
         MessageDlg( 'Error reading file:' + CRLF + filename, mtError, [mbOK], 0 );
         break;
       end;
-      debug('TODO: Non-threaded ExecSql call in TfrmInsertFilesProgress.ProcessFiles().');
       zq.ExecSql;
       lblOperation.caption := 'Freeing memory ...';
       lblOperation.Repaint;
diff --git a/source/mysqlquerythread.pas b/source/mysqlquerythread.pas
index f3009089..81d5049a 100644
--- a/source/mysqlquerythread.pas
+++ b/source/mysqlquerythread.pas
@@ -328,8 +328,7 @@ begin
   Result := False;
   q := TDeferDataSet.Create(nil, callback);
   q.Connection := FMysqlConn;
-  // Parameter checking is used in Insert Files,
-  // which does not pass through here (yet).
+  // Parameter checking is used only in Insert Files, which has it's own TZQuery.
   q.ParamCheck := false;
   q.SQL.Text := ASql;
   ADataset := q;
@@ -354,8 +353,7 @@ begin
   Result := False;
   q := TDeferDataSet.Create(nil, callback);
   q.Connection := FMysqlConn;
-  // Parameter checking is used in Insert Files,
-  // which does not pass through here (yet).
+  // Parameter checking is used only in Insert Files, which has it's own TZQuery.
   q.ParamCheck := false;
   q.SQL.Text := ASql;
   ADataSet := q;