paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-04 12:29:27 +01:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Revert 37916 #e54706e814: Play macro in one step (one undo block / BeginUpdate)

Browse Source 
git-svn-id: trunk@37918 -
This commit is contained in:
martin 2012-07-12 13:24:48 +00:00
parent cb8750c0e9
commit 67f2fbcd89
1 changed files with 3 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
components/synedit/synmacrorecorder.pas
View File

@ -709,14 +709,9 @@ begin
fState := msPlaying;
try
StateChanged;
aEditor.BeginUpdate;
try
for cEvent := 0 to EventCount -1 do begin
Events[ cEvent ].Playback( aEditor );
if FStopRequested then break;
end;
finally
aEditor.EndUpdate;
for cEvent := 0 to EventCount -1 do begin
Events[ cEvent ].Playback( aEditor );
if FStopRequested then break;
end;
finally
fState := msStopped;