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

SynEdit: fix invalidate (repaint) on line selection through gutter click / issue #0029490

Browse Source 
git-svn-id: trunk@51576 -
This commit is contained in:
martin 2016-02-10 16:35:37 +00:00
parent 9ff17efea7
commit 6e78df57da
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/synedit/syneditpointclasses.pas
View File

@ -2307,8 +2307,11 @@ begin
WasAvail := SelAvail; WasAvail := SelAvail;
FForceSingleLineSelected := AValue; FForceSingleLineSelected := AValue;
if WasAvail <> SelAvail then if WasAvail <> SelAvail then begin
FInvalidateLinesMethod(Min(FStartLinePos, FEndLinePos),
Max(FStartLinePos, FEndLinePos) );
fOnChangeList.CallNotifyEvents(self); fOnChangeList.CallNotifyEvents(self);
end;
end; end;
procedure TSynEditSelection.SetHide(const AValue: Boolean); procedure TSynEditSelection.SetHide(const AValue: Boolean);