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;