diff --git a/source/table_editor.pas b/source/table_editor.pas
index 980febdf..489bb0d6 100644
--- a/source/table_editor.pas
+++ b/source/table_editor.pas
@@ -1758,6 +1758,7 @@ begin
       ListForeignKeys.Margins.Bottom := 0
     else
       ListForeignKeys.Margins.Bottom := GetTextHeight(pnlNoForeignKeys.Font)+4;
+    ListForeignKeys.Repaint;
   end;
   UpdateSQLcode;
 end;