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

Cocoa: fix double spaces in CustomControl

Browse Source 
https://forum.lazarus.freepascal.org/index.php/topic,70901.0.html
This commit is contained in:
rich2014 2025-05-09 22:06:26 +08:00
parent 33f032ca1a
commit 4b4175e8e1
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/interfaces/cocoa/cocoacustomcontrol.pas
View File

@ -331,6 +331,7 @@ begin
[kVK_Return, kVK_ANSI_KeypadEnter, kVK_Escape, kVK_Space]) then [kVK_Return, kVK_ANSI_KeypadEnter, kVK_Escape, kVK_Space]) then
begin begin
inherited; inherited;
self.callback.KeyEvHandled;
exit; exit;
end; end;