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

SynEdit: Internal caret (multi caret / custom-color caret) keep visible while scrolling.

Browse Source
This commit is contained in:
Martin 2022-03-29 17:55:12 +02:00
parent f5e70a4f0b
commit 398de0f4b4
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/synedit/syneditpointclasses.pas
View File

@ -3479,6 +3479,7 @@ begin
FNeedPositionConfirmed := True; FNeedPositionConfirmed := True;
end; end;
{$ENDIF} {$ENDIF}
FOwner.PaintTimer.RestartCycle;
end; end;
procedure TSynEditScreenCaretPainterInternal.BeginPaint(rcClip: TRect); procedure TSynEditScreenCaretPainterInternal.BeginPaint(rcClip: TRect);