fix: cannot save new table when added column was removed

Refs #2326
This commit is contained in:
Ansgar Becker
2025-12-07 12:29:47 +01:00
parent d39cd0524c
commit 07d29c8e30

View File

@@ -946,7 +946,8 @@ begin
CreateLines := TStringList.Create;
// Lines with columns, indexes, foreign keys and check constraints
for Col in FColumns do begin
CreateLines.Add(Col.SQLCode);
if not (Col.Status in [esDeleted, esAddedDeleted]) then
CreateLines.Add(Col.SQLCode);
end;
for i:=0 to FKeys.Count-1 do begin
if not FKeys[i].InsideCreateCode then