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

SynEdit: Highlight-all, fix index for last element

Browse Source 
git-svn-id: trunk@43375 -
This commit is contained in:
martin 2013-11-05 09:59:55 +00:00
parent adf1d0e502
commit 044a2e94ef
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/syneditmarkuphighall.pp
View File

@ -2264,7 +2264,7 @@ begin
if (OldEndPoint.y >= 0) and not IsPosValid(OldEndPoint) then if (OldEndPoint.y >= 0) and not IsPosValid(OldEndPoint) then
OldEndPoint := Point(1, FFirstInvalidLine - AdjustedSearchStrMaxLines); OldEndPoint := Point(1, FFirstInvalidLine - AdjustedSearchStrMaxLines);
if (OldEndPoint.y < 0) and (FMatches.Count > 0) then if (OldEndPoint.y < 0) and (FMatches.Count > 0) then
OldEndPoint := FMatches.EndPoint[FMatches.Count]; OldEndPoint := FMatches.EndPoint[FMatches.Count-1];
if (OldEndPoint.y <= OldStartPoint.y) or if (OldEndPoint.y <= OldStartPoint.y) or
(OldEndPoint.y < 0) or (OldStartPoint.y < 0) or (OldEndPoint.y < 0) or (OldStartPoint.y < 0) or