编辑器

优化
2023-04-24 15:46:19 +08:00
parent a60b46689f
commit e4aa4fe0cf
2 changed files with 40 additions and 37 deletions
@@ -5935,7 +5935,7 @@ type TFindWnd=class(TPage)
        if it then
        begin
            s1 := it.SelText;
-            if s1 and length(s1)<20 and not(pos("\n",s1))then
+            if s1 and not(pos("\n",s1))then //length(s1)<20 and  取消长度限制
            begin
                s := s1;
            end else