From b9a242e94c343ef2d0a097e2ef646fa9cd9ade49 Mon Sep 17 00:00:00 2001
From: blikblum <blikblum@lazarus-ide.org>
Date: Mon, 25 Nov 2013 00:06:18 +0000
Subject: [PATCH] lcl: reset controldatalink after listsource changes in lookup
 controls to ensure proper sync between control display and dataset content

git-svn-id: trunk@43478 -
---
 lcl/include/dblookup.inc | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lcl/include/dblookup.inc b/lcl/include/dblookup.inc
index a44430c04a..bc150e8314 100644
--- a/lcl/include/dblookup.inc
+++ b/lcl/include/dblookup.inc
@@ -96,7 +96,10 @@ end;
 procedure TDBLookup.EditingChange(Sender: TObject);
 begin
   if FListLink.Active and not (FListLink.Editing) then
+  begin
     FetchLookupData;
+    FControlLink.Reset;
+  end;
 end;
 
 // do not show in property inspector if FHasLookUpField