paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 15:39:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE/SynEdit: Added basic macro recorder

Browse Source 
git-svn-id: trunk@35458 -
This commit is contained in:
martin 2012-02-18 17:09:03 +00:00
parent 33a2b41630
commit 9369fbe99c
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/lazarusidestrconsts.pas
View File

@ -2377,6 +2377,7 @@ resourcestring
ueModified='Modified';
ueLocked='Locked';
ueMacroRecording = 'Recording';
ueMacroRecordingPaused = 'Rec-pause';
uepReadonly= 'Readonly';
uepIns='INS';
uepOvr='OVR';

7
ide/sourceeditor.pp
View File

@ -6959,6 +6959,13 @@ begin
PanelFileMode := PanelFileMode + lisUEModeSeparator;
PanelFileMode := PanelFileMode + ueMacroRecording;
end;
if (Manager.MacroRecorder.State = msPaused) and
(Manager.MacroRecorder.CurrentEditor = CurEditor)
then begin
if PanelFileMode <> '' then
PanelFileMode := PanelFileMode + lisUEModeSeparator;
PanelFileMode := PanelFileMode + ueMacroRecordingPaused;
end;
If TempEditor.IsLocked then begin
if PanelFileMode <> '' then