From 9abb167fde508c2d4d6ffc260f95810d56e2d0d3 Mon Sep 17 00:00:00 2001 From: michl Date: Wed, 18 Oct 2017 19:37:47 +0000 Subject: [PATCH] LCL: GTK2: Using nboKeyboardTabSwitch in TabControl options and + now working. git-svn-id: trunk@56130 - --- lcl/include/customnotebook.inc | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lcl/include/customnotebook.inc b/lcl/include/customnotebook.inc index 8b69826d96..dd4873924a 100644 --- a/lcl/include/customnotebook.inc +++ b/lcl/include/customnotebook.inc @@ -788,11 +788,13 @@ begin begin if Shift = [ssCtrl] then begin + Key := 0; PageIndex := (PageIndex + 1) mod PageCount; Exit; end else if Shift = [ssCtrl, ssShift] then begin + Key := 0; PageIndex := (PageIndex + PageCount - 1) mod PageCount; Exit; end;