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