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

Issue #2122: support table comment syntax when creating new PostgreSQL tables

Browse Source
This commit is contained in:
Ansgar Becker
2025-09-17 19:56:03 +02:00
parent 61c13532d6
commit d8bf7a62cd
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/table_editor.pas
View File

@@ -953,7 +953,7 @@ begin
Delete(SQL, Length(SQL)-2, 3);
SQL := SQL + CRLF + ')' + CRLF;
if memoComment.Text <> '' then
if (memoComment.Text <> '') and (not DBObject.Connection.Parameters.IsAnyPostgreSQL) then
SQL := SQL + 'COMMENT='+DBObject.Connection.EscapeString(memoComment.Text) + CRLF;
if comboCollation.Text <> '' then
SQL := SQL + 'COLLATE='+DBObject.Connection.EscapeString(comboCollation.Text) + CRLF;
@@ -984,6 +984,10 @@ begin
// Separate queries from here on
if DBObject.Connection.Parameters.IsAnyPostgreSQL then begin
if memoComment.Text <> '' then begin
SQL := SQL + 'COMMENT ON TABLE '+DBObject.Connection.QuoteIdent(editName.Text)+
' IS '+DBObject.Connection.EscapeString(memoComment.Text) + ';' + sLineBreak;
end;
Node := listColumns.GetFirst;
while Assigned(Node) do begin
Col := listColumns.GetNodeData(Node);