paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-05 06:37:20 +01:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Fixed an issue with missing redraw/invalidation

Browse Source 
git-svn-id: trunk@24515 -
This commit is contained in:
martin 2010-04-08 16:07:25 +00:00
parent 58bb9f1591
commit f809d8cd0d
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/synedit/synedit.pp
View File

@ -4567,11 +4567,10 @@ begin
FChangedLinesEnd:=AIndex + 1 + MaX(ACount, 0)
else
FChangedLinesEnd := FChangedLinesEnd + MaX(ACount, 0);
end else begin
end else
ScanRanges;
InvalidateLines(AIndex + 1, -1);
InvalidateGutterLines(AIndex + 1, -1);
end;
InvalidateLines(AIndex + 1, -1);
InvalidateGutterLines(AIndex + 1, -1);
end;
procedure TCustomSynEdit.LineTextChanged(Sender: TSynEditStrings;