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

IDE: Remove Ctrl-Enter shortcut from IdoOptionsDlg. It did not work. Issue #40234.

Browse Source
This commit is contained in:
Juha 2024-11-15 13:35:25 +02:00
parent a724e2b3a3
commit c4969dc5fd
2 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/ideoptionsdlg.lfm
View File

@ -24,7 +24,7 @@ inherited IDEOptionsDialog: TIDEOptionsDialog
BorderSpacing.Bottom = 6 BorderSpacing.Bottom = 6
BorderSpacing.Around = 0 BorderSpacing.Around = 0
OKButton.Name = 'OKButton' OKButton.Name = 'OKButton'
OKButton.Hint = '[Ctrl+Enter]' OKButton.Hint = '[Enter]'
OKButton.DefaultCaption = True OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton' HelpButton.Name = 'HelpButton'
HelpButton.Hint = '[F1]' HelpButton.Hint = '[F1]'

5
ide/ideoptionsdlg.pas
View File

@ -366,11 +366,6 @@ begin
CancelButtonClick(Sender); CancelButtonClick(Sender);
Key := 0; Key := 0;
end end
else if (Key = VK_RETURN) and (Shift = [ssCtrl]) then
begin
OkButtonClick(Sender);
Key := 0;
end
else if (Key = VK_RETURN) and (Shift = [ssShift]) then else if (Key = VK_RETURN) and (Shift = [ssShift]) then
begin begin
ApplyButtonClick(Sender); ApplyButtonClick(Sender);