Correct some code comments.

This commit is contained in:
rosenfield
2007-11-09 07:59:14 +00:00
parent 727e79aa33
commit 51c23000f9
2 changed files with 2 additions and 5 deletions

View File

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

View File

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