paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-14 02:19:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: make FindMatchingBracketPair virtual

Browse Source
This commit is contained in:
Ondrej Pokorny 2023-01-04 10:24:36 +01:00
parent 18335e0eaf
commit 663123ff29
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/synedit/syneditmarkupbracket.pp
View File

@ -45,8 +45,7 @@ type
FNeedInvalidate: Boolean;
procedure SetHighlightStyle(const AValue: TSynEditBracketHighlightStyle);
protected
procedure FindMatchingBracketPair(LogCaret: TPoint;
var StartBracket, EndBracket: TPoint);
procedure FindMatchingBracketPair(LogCaret: TPoint; var StartBracket, EndBracket: TPoint); virtual;
procedure DoCaretChanged(Sender: TObject); override;
procedure DoTopLineChanged(OldTopLine : Integer); override;
procedure DoLinesInWindoChanged(OldLinesInWindow : Integer); override;