From a9a4ee5dfcbd17e3cf806d84e1643a612ea0a02e Mon Sep 17 00:00:00 2001
From: JianjunLiu <cqljj123@126.com>
Date: Thu, 23 Mar 2023 11:53:28 +0800
Subject: [PATCH] =?UTF-8?q?=E7=BC=96=E8=BE=91=E5=99=A8?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

优化home
---
 funcext/tvclib/utslmemo.tsf | 1 +
 1 file changed, 1 insertion(+)

diff --git a/funcext/tvclib/utslmemo.tsf b/funcext/tvclib/utslmemo.tsf
index 7c1bc79..dec09f4 100644
--- a/funcext/tvclib/utslmemo.tsf
+++ b/funcext/tvclib/utslmemo.tsf
@@ -1449,6 +1449,7 @@ type TCustomMemo = class(TCustomScrollControl,TCustomMemoCmd) //
                             if vi<>" " or vi="\t" then 
                             begin
                                 nx := i;
+                                if fCaretX = nx then nx := 1;
                                 break;
                             end 
                         end