From 300707437e69ac96d7ceac469ca4910ade833710 Mon Sep 17 00:00:00 2001
From: zeljko <zeljko@lazarus-ide.org>
Date: Mon, 14 Sep 2015 08:34:03 +0000
Subject: [PATCH] Qt: pass key events from dropdown list to the lcl. part of
 issue #28553

git-svn-id: trunk@49824 -
---
 lcl/interfaces/qt/qtwidgets.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas
index e793317808..379a859374 100644
--- a/lcl/interfaces/qt/qtwidgets.pas
+++ b/lcl/interfaces/qt/qtwidgets.pas
@@ -10726,7 +10726,7 @@ begin
 
   if (FDropList <> nil) and (Sender = FDropList.Widget) then
   begin
-    if QEvent_type(Event) = QEventFontChange then
+    if (Byte(QEvent_type(Event)) in [QEventKeyPress, QEventKeyRelease,QEventFontChange]) then
       Result := inherited EventFilter(Sender, Event);
     QEvent_ignore(Event);
     exit;