From 5afc05a55681edd3c05934ccb8ba965a87d64ad0 Mon Sep 17 00:00:00 2001 From: martin Date: Thu, 19 Aug 2010 23:48:09 +0000 Subject: [PATCH] SynEdit: small fix/optimization to caret (avoid extra SetPos calls) git-svn-id: trunk@27151 - --- components/synedit/syneditpointclasses.pas | 2 ++ 1 file changed, 2 insertions(+) diff --git a/components/synedit/syneditpointclasses.pas b/components/synedit/syneditpointclasses.pas index 5297353597..240c78c581 100644 --- a/components/synedit/syneditpointclasses.pas +++ b/components/synedit/syneditpointclasses.pas @@ -1794,6 +1794,8 @@ begin debugln(['SynEditCaret SetPos for handle=',FHandle, ' x=', x, ' y=',y]); {$ENDIF} SetCaretPosEx(FHandle, x, y); + FCurrentPosX := x; + FCurrentPosY := y; end; if (not FCurrentVisible) then begin {$IFDeF SynCaretDebug}