From 3d386886873a1cbbd6b3cc884c0737e38c4535c3 Mon Sep 17 00:00:00 2001 From: martin Date: Tue, 2 Jun 2020 00:37:10 +0000 Subject: [PATCH] SynEdit: fix for AddVisibleOffsetToTextIndex git-svn-id: trunk@63266 - --- components/synedit/lazsynedittext.pas | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/components/synedit/lazsynedittext.pas b/components/synedit/lazsynedittext.pas index 63e9aa5b61..521c0c37e1 100644 --- a/components/synedit/lazsynedittext.pas +++ b/components/synedit/lazsynedittext.pas @@ -486,6 +486,8 @@ type function TextToViewIndex(aTextIndex : TLineIdx) : TLineIdx; override; function ViewToTextIndex(aViewIndex : TLineIdx) : TLineIdx; override; + function AddVisibleOffsetToTextIndex(aTextIndex: TLineIdx; LineOffset: Integer): TLineIdx; override; + public // LogX, LogY are 1-based procedure EditInsert(LogX, LogY: Integer; AText: String); override; function EditDelete(LogX, LogY, ByteLen: Integer): String; override; @@ -1684,6 +1686,12 @@ begin Result := fSynStringsXYMap.ViewToTextIndex(aViewIndex); end; +function TSynEditStringsLinked.AddVisibleOffsetToTextIndex( + aTextIndex: TLineIdx; LineOffset: Integer): TLineIdx; +begin + Result := fSynStrings.AddVisibleOffsetToTextIndex(aTextIndex, LineOffset); +end; + procedure TSynEditStringsLinked.IgnoreSendNotification(AReason: TSynEditNotifyReason; IncIgnore: Boolean); begin