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

clean up

Browse Source 
git-svn-id: trunk@42084 -
This commit is contained in:
mattias 2013-07-14 06:36:50 +00:00
parent 094b0b1351
commit 5c16922af0
2 changed files with 0 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/gtk/gtkproc.inc
View File

@ -2203,12 +2203,6 @@ var
end;
end;
{$ENDIF}
{debugln('KeyActivatedAccelerator call TControl.DialogChar');
if TControl(AComponent).DialogChar(Msg.CharCode) then begin
debugln('KeyActivatedAccelerator C handled by LCL');
StopKeyEvent;
Result:=true;
end;}
end;
end;
end;

7
lcl/interfaces/gtk2/gtk2proc.inc
View File

@ -2122,13 +2122,6 @@ var
if Result then exit;
end;
end;
{debugln('KeyActivatedAccelerator call TControl.DialogChar');
if TControl(AComponent).DialogChar(Msg.CharCode) then begin
debugln('KeyActivatedAccelerator C handled by LCL');
StopKeyEvent;
Result:=true;
end;}
end;
end;
end;