Update utslmemo.tsf

加入try

funcext/tvclib/utslmemo.tsf

@@ -2365,7 +2365,11 @@ type TCustomMemo = class(TCustomScrollControl,TCustomMemoCmd) //
                 if not s then return "";
                 bg := min(bb[1],ee[1]);
                 ed := max(bb[1],ee[1]);
-                if bg<ed then return s[bg:(ed-1)];
+                try 
+                if bg<ed then return s[bg:(ed-1)]; //2023078 出错
+                except
+                
+                end
                 return "";
                 {if ee[1]>bb[1]and ee[1]>1 then 
                 try