opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix SQL error in table editor on MySQL below 4.0.18: Use TYPE instead of ENGINE in these cases. Fixes issue #1517

Browse Source
This commit is contained in:
Ansgar Becker
2009-12-09 18:12:45 +00:00
parent a24c2bb847
commit 1de8e6344b
1 changed files with 12 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
source/table_editor.pas
View File

@@ -471,8 +471,12 @@ begin
Specs.Add('COMMENT=' + esc(memoComment.Text));
if (comboCollation.Tag = ModifiedFlag) or (chkCharsetConvert.Checked) then
Specs.Add('COLLATE=' + comboCollation.Text);
if comboEngine.Tag = ModifiedFlag then
Specs.Add('ENGINE=' + comboEngine.Text);
if comboEngine.Tag = ModifiedFlag then begin
if Mainform.Connection.ServerVersionInt < 40018 then
Specs.Add('TYPE=' + comboEngine.Text)
else
Specs.Add('ENGINE=' + comboEngine.Text);
end;
if comboRowFormat.Tag = ModifiedFlag then
Specs.Add('ROW_FORMAT=' + comboRowFormat.Text);
if chkChecksum.Tag = ModifiedFlag then
@@ -651,8 +655,12 @@ begin
Result := Result + 'COMMENT='+esc(memoComment.Text) + CRLF;
if comboCollation.Text <> '' then
Result := Result + 'COLLATE='+comboCollation.Text + CRLF;
if comboEngine.Text <> '' then
Result := Result + 'ENGINE='+comboEngine.Text + CRLF;
if comboEngine.Text <> '' then begin
if Mainform.Connection.ServerVersionInt < 40018 then
Result := Result + 'TYPE='+comboEngine.Text + CRLF
else
Result := Result + 'ENGINE='+comboEngine.Text + CRLF;
end;
if comboRowFormat.Text <> '' then
Result := Result + 'ROW_FORMAT='+comboRowFormat.Text + CRLF;
if chkChecksum.Checked then