lcl: check for FDataLink.Active in ActiveChange in LookupListBox as done for combobox

git-svn-id: trunk@37248 -
This commit is contained in:
blikblum 2012-05-10 23:17:54 +00:00
parent a99204022d
commit 0ef6cbff1b

View File

@ -38,7 +38,8 @@ end;
procedure TDBLookupListBox.ActiveChange(Sender: TObject);
begin
UpdateLookup;
if FDataLink.Active then
UpdateLookup;
end;
procedure TDBLookupListBox.DataChange(Sender: TObject);