diff --git a/designer/utslvcldebuger.tsf b/designer/utslvcldebuger.tsf
index 9156fe6..b31dac9 100644
--- a/designer/utslvcldebuger.tsf
+++ b/designer/utslvcldebuger.tsf
@@ -188,13 +188,6 @@ type TFTSLScriptcustomMemo=class(TSYNmemoNorm)
     end
     function DoTextChanged(p);override;
     begin
-        {n := Lines.Length();
-        ccnt := GutterCharCnt;
-        nccnt := max(integer(n~10)+2,3);
-        if ccnt <> nccnt then
-        begin
-            GutterCharCnt := nccnt;
-        end}
         inherited;
         SetChangeFlag(true);
     end
diff --git a/designer/utslvcldpropertytypes.tsf b/designer/utslvcldpropertytypes.tsf
index 3845355..4d7cbc3 100644
--- a/designer/utslvcldpropertytypes.tsf
+++ b/designer/utslvcldpropertytypes.tsf
@@ -3433,6 +3433,7 @@ type TtextEditor = class(tpanel)
         wssysmenu := true;
         caption := "text Editor Dialog";
         memo := new tmemo(self);
+        memo.autogutterwidth := true;
         memo.OnKeyPress := thisfunction(MemoKeyPress);
         memo.parent :=self;
         btn1 := new tbtn(self);
diff --git a/funcext/tvclib/utslmemo.tsf b/funcext/tvclib/utslmemo.tsf
index a524601..c76672b 100644
--- a/funcext/tvclib/utslmemo.tsf
+++ b/funcext/tvclib/utslmemo.tsf
@@ -1222,8 +1222,7 @@ type TCustomMemo = class(TCustomScrollControl,TCustomMemoCmd) //
     end
     function DoTextChanged(p);virtual;//文本改变
     begin
-        //改变 
-        autosetgtwidth();       
+        //改变      
     end
     function DoCaretPosChanged();virtual;//caret位置改变
     begin
@@ -1687,6 +1686,7 @@ type TCustomMemo = class(TCustomScrollControl,TCustomMemoCmd) //
         begin
             fRedoList.Clear();
         end 
+        autosetgtwidth();  
         return DoTextChanged(p);
     end 
     function  setcurrentLineColor(c);