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

SynEdit: optimize syncro edit / skip event if inactive

Browse Source 
git-svn-id: trunk@30073 -
This commit is contained in:
martin 2011-03-29 21:25:33 +00:00
parent 1c92a3ea27
commit c3ace57233
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/synpluginsyncronizededitbase.pp
View File

@ -1175,8 +1175,10 @@ end;
procedure TSynPluginCustomSyncroEdit.DoPaintLockEnded; procedure TSynPluginCustomSyncroEdit.DoPaintLockEnded;
begin begin
inherited DoPaintLockEnded; inherited DoPaintLockEnded;
if Active then begin
ApplyChangeList; ApplyChangeList;
UpdateCurrentCell; UpdateCurrentCell;
end;
end; end;
procedure TSynPluginCustomSyncroEdit.UpdateCurrentCell; procedure TSynPluginCustomSyncroEdit.UpdateCurrentCell;