diff --git a/designer/utslcodeeditor.tsf b/designer/utslcodeeditor.tsf
index 5f31501..f9fdc1c 100644
--- a/designer/utslcodeeditor.tsf
+++ b/designer/utslcodeeditor.tsf
@@ -4858,7 +4858,7 @@ type tfincodemap = class(tcustomcontrol)
         inherited;
         Visible := false;
         FTempNodes := array();
-        Width := 230;        
+        Width := 300;        
         Ftimer := new TTimer(self);
         Ftimer.Interval := 200;
         Ftimer.Ontimer := thisfunction(BdownTimeOut);
diff --git a/funcext/tvclib/utslvclstdctl.tsf b/funcext/tvclib/utslvclstdctl.tsf
index 4b9bcb0..ad86bc1 100644
--- a/funcext/tvclib/utslvclstdctl.tsf
+++ b/funcext/tvclib/utslvclstdctl.tsf
@@ -4269,6 +4269,13 @@ type TcustomComboBox=class(TCustomComboBoxbase)
             ShowDropDown(false);
             CallMessgeFunction(OnSelchanged,self(true),e);
         end
+        FEdit.onmousedown := function(o,e)begin
+            if Freadonly then 
+            begin
+                e.skip := true;
+                ShowDropDown(true);
+            end 
+        end 
         FEdit.Readonly := Freadonly;
         FListBox.parent := self;
         FEdit.parent := self;