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

Gracefully ignore non existent columns on older servers. Fixes issue #1547

Browse Source
This commit is contained in:
Ansgar Becker
2009-12-21 09:13:01 +00:00
parent 4501f070a9
commit f1d22faa6a
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/mysql_connection.pas
View File

@ -900,7 +900,7 @@ begin
else else
Obj.Engine := Results.Col('Engine'); Obj.Engine := Results.Col('Engine');
Obj.Comment := Results.Col('Comment'); Obj.Comment := Results.Col('Comment');
Obj.Version := StrToInt64Def(Results.Col('Version'), -1); Obj.Version := StrToInt64Def(Results.Col('Version', True), -1);
Obj.AutoInc := StrToInt64Def(Results.Col('Auto_increment'), -1); Obj.AutoInc := StrToInt64Def(Results.Col('Auto_increment'), -1);
Obj.RowFormat := Results.Col('Row_format'); Obj.RowFormat := Results.Col('Row_format');
Obj.AvgRowLen := StrToInt64Def(Results.Col('Avg_row_length'), -1); Obj.AvgRowLen := StrToInt64Def(Results.Col('Avg_row_length'), -1);
@ -912,8 +912,8 @@ begin
Obj.LastChecked := StrToDateTime(Results.Col('Check_time')) Obj.LastChecked := StrToDateTime(Results.Col('Check_time'))
else else
Obj.LastChecked := 0; Obj.LastChecked := 0;
Obj.Collation := Results.Col('Collation'); Obj.Collation := Results.Col('Collation', True);
Obj.CheckSum := StrToInt64Def(Results.Col('Checksum'), -1); Obj.CheckSum := StrToInt64Def(Results.Col('Checksum', True), -1);
Obj.CreateOptions := Results.Col('Create_options'); Obj.CreateOptions := Results.Col('Create_options');
Results.Next; Results.Next;
end; end;