opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 22:00:16 +08:00
Code Issues Packages Projects Releases Wiki Activity

Ensure column correct lengths are set in SetRecNo. Fixes issue #1921.

Browse Source
This commit is contained in:
Ansgar Becker
2010-05-08 13:50:32 +00:00
parent 88a524a1f0
commit 634f5cb951
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
source/mysql_connection.pas
View File

@ -1643,6 +1643,8 @@ begin
if Row.RecNo = Value then begin
FCurrentRow := nil;
FCurrentUpdateRow := Row;
for i:=Low(FColumnLengths) to High(FColumnLengths) do
FColumnLengths[i] := Length(FCurrentUpdateRow[i].NewText);
RowFound := True;
break;
end;
@ -1692,7 +1694,7 @@ begin
end else begin
// The normal case: Fetch cell from mysql result
SetString(AnsiStr, FCurrentRow[Column], FColumnLengths[Column]);
if Connection.IsUnicode then
if Connection.IsUnicode and (not (Datatype(Column).Category in [dtcBinary, dtcSpatial])) then
Result := UTF8ToString(AnsiStr)
else
Result := String(AnsiStr);