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

LCL, grids: Stop processing the key VK_ESCAPE in the editor if the user has already handled the event, issue #30044

Browse Source 
git-svn-id: trunk@52749 -
This commit is contained in:
jesus 2016-07-25 18:49:56 +00:00
parent d447c14966
commit 12693f48c3
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/grids.pas
View File

@ -9689,8 +9689,10 @@ begin
VK_ESCAPE:
begin
doGridKeyDown;
SetEditText(FGrid.FEditorOldValue);
FGrid.EditorHide;
if key<>0 then begin
SetEditText(FGrid.FEditorOldValue);
FGrid.EditorHide;
end;
end;
else
doEditorKeyDown;