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

SynEdit: deprecate ecGotFocus / ecLostFocus. They have no functionality.

Browse Source
This commit is contained in:
Martin 2025-01-26 15:09:24 +01:00
parent 97ea7c51a4
commit fce631b4f7
2 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/synedit/syneditkeycmds.pp
View File

@ -298,8 +298,8 @@ const
ecBlockIndentMove = 651; // Indent selection (indent before column-sel, therefore moving the column-sel) ecBlockIndentMove = 651; // Indent selection (indent before column-sel, therefore moving the column-sel)
ecBlockUnindentMove = 652; // Unindent selection (indent before column-sel, therefore moving the column-sel) ecBlockUnindentMove = 652; // Unindent selection (indent before column-sel, therefore moving the column-sel)
ecGotFocus = 700; ecGotFocus = 700 deprecated 'Not used / To be removed in Lazarus 5.99';
ecLostFocus = 701; ecLostFocus = 701 deprecated 'Not used / To be removed in Lazarus 5.99';
ecUserDefinedFirst = 900; ecUserDefinedFirst = 900;
ecUserDefinedLast = 999; ecUserDefinedLast = 999;

4
components/synedit/syneditplugins.pas
View File

@ -509,8 +509,7 @@ begin
ecTab: ecTab:
Accept; Accept;
ecDeleteChar, ecDeleteChar,
ecRight, ecSelRight, ecColSelRight, ecRight, ecSelRight, ecColSelRight:
ecLostFocus, ecGotFocus:
; {processed on AfterProcessing} ; {processed on AfterProcessing}
else else
Cancel; Cancel;
@ -518,7 +517,6 @@ begin
end end
else { AfterProcessing } else { AfterProcessing }
case Command of case Command of
ecLostFocus, ecGotFocus,
ecDeleteChar: ecDeleteChar:
; ;
ecDeleteLastChar, ecDeleteLastChar,