diff --git a/lcl/include/dbcombobox.inc b/lcl/include/dbcombobox.inc
index d0fd67de00..6a39b9c8a1 100644
--- a/lcl/include/dbcombobox.inc
+++ b/lcl/include/dbcombobox.inc
@@ -64,7 +64,7 @@ begin
   try
     if FDataLink.Edit then
     begin
-       FDataLink.Modified;
+       FDataLink.UpdateData;
        inherited Select;
     end
     else