设计器

优化
2022-10-13 15:20:07 +08:00
parent 9b652672e8
commit 526e4343a1
3 changed files with 3 additions and 9 deletions
@@ -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);