Bugfix: avoid mangling newlines when sending SQL to Zeos. Fixes remaining part of issue #1094.

This commit is contained in:
rosenfield.albert
2009-04-28 20:06:35 +00:00
parent 0229c6df58
commit 1d0b3d2b85

View File

@ -241,7 +241,8 @@ begin
q.Connection := FMysqlConn; q.Connection := FMysqlConn;
// Parameter checking is used only in Insert Files, which has it's own TZQuery. // Parameter checking is used only in Insert Files, which has it's own TZQuery.
q.ParamCheck := false; q.ParamCheck := false;
q.SQL.Text := ASql; q.SQL.Clear;
q.SQL.Add(ASql);
ADataset := q; ADataset := q;
try try