--- ibx/trunk/ibcontrols/IBLookupComboEditBox.pas	2017/06/29 11:11:22	64
+++ ibx/trunk/ibcontrols/IBLookupComboEditBox.pas	2017/07/12 09:13:04	65
@@ -350,6 +350,11 @@ begin
                SelLength := UTF8Length(Text);
              end;
              KeyValue := ListSource.DataSet.FieldByName(KeyField).AsVariant;
+           end
+           else
+           begin
+             SelStart := iSelStart;
+             SelLength := 0;
            end;
          end;
     finally