From 335bdd17cd7c4eb48c92d0a3f6542c700e9e307f Mon Sep 17 00:00:00 2001 From: mattias Date: Sun, 10 Jun 2018 08:37:56 +0000 Subject: [PATCH] lcl: gtk2: pass KF_ALTDOWN even if key is not a SysKey git-svn-id: trunk@58214 - --- lcl/interfaces/gtk2/gtk2proc.inc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lcl/interfaces/gtk2/gtk2proc.inc b/lcl/interfaces/gtk2/gtk2proc.inc index 564ab0a933..5ee5bc5600 100644 --- a/lcl/interfaces/gtk2/gtk2proc.inc +++ b/lcl/interfaces/gtk2/gtk2proc.inc @@ -2367,7 +2367,7 @@ begin end; end; - if SysKey then + if SysKey or (ssAlt in ShiftState) then Flags := Flags or KF_ALTDOWN; CommonKeyData := KeyCode shl 16; // Not really scancode, but will do