TGestureManager向左和向右滑动

Question

所以我有一个标签控件，上面有几个项目（标签等）。

如果我有类似下面的内容，它似乎无法奏效。它似乎没有 - 正确。如果我向左滑动＆＃34;，并且手势在一系列后代中运行，它会起作用吗？

procedure TFormMain.TabControlAppGesture(Sender: TObject; const EventInfo: TGestureEventInfo; var Handled: Boolean);
begin
   if (EventInfo.GestureID = sgiLeft) then
      begin
        //go right and show report
        TabControlApp.ActiveTab:=TabItemReport;
      end
   else if (EventInfo.GestureID = sgiRight) then
      begin
        //Go Left and show data
        TabControlApp.ActiveTab:=TabItemData;
      end
   else
      begin
        //Who knows what they did and who cares
      end;

  //handle event regardless
  Handled:=True;
end;

我想真正的问题是：无论用户刷什么，我都可以进行全局应用程序刷卡吗？