From 64d3d1447ef7bdd8eaf1e6b871ee7fd6385382d4 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sun, 7 Feb 2010 10:45:43 +0000
Subject: [PATCH] Foreign key editor needs to be repainted when selecting
 another table. Fixes issue #1667.

---
 source/table_editor.pas | 1 +
 1 file changed, 1 insertion(+)

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;