From e075f725876440f1d7d5da0dea996656c8b7d9e9 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Sun, 19 Nov 2017 07:31:03 +0100
Subject: [PATCH] workaround #190

---
 src/ce_synmemo.pas | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index 47552e5e..15238199 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -752,10 +752,10 @@ begin
   fMemo.MouseActions.Clear;
   fMemo.Keystrokes.Clear;
   fMemo.CaptureMouseButtons:=[];
+  fMemo.Options:=fMemo.Options+[eoNoCaret];
 
   fD2Hl:= TSynD2Syn.create(self);
   fTxtHl:= TSynTxtSyn.Create(self);
-
   fSource:= editor;
   updateFromSource();
 end;
@@ -770,16 +770,15 @@ begin
     fMemo.Color:= fSource.Color;
     fMemo.LineHighlightColor.Assign(fSource.LineHighlightColor);
     fMemo.SelectedColor.Assign(fSource.SelectedColor);
-    if fSource.Highlighter is TSynD2Syn then
+    if fMemo.Highlighter.isNil then
     begin
       fD2Hl.Assign(fSource.Highlighter);
-      fMemo.Highlighter := fD2Hl;
-    end
-    else
-    begin
       fTxtHl.Assign(fSource.Highlighter);
-      fMemo.Highlighter := fTxtHl;
     end;
+    if fSource.Highlighter is TSynD2Syn then
+      fMemo.Highlighter := fD2Hl
+    else
+      fMemo.Highlighter := fTxtHl;
   end;
 end;
 
@@ -800,6 +799,7 @@ begin
   else if value < 1 then
     value := 1;
   fMemo.CaretY := value;
+  fMemo.CaretX := 1;
   fMemo.SelectLine(true);
 end;
 {$ENDREGION}