How do I make a shortcut key do different things depending on the active tab page?

Question

Each TTabSheet on my TPageControl has a TToolBar on it. Each tool bar has a TToolButton that should respond to the same keyboard shortcut. How do I provide hotkeys so that the right button is invoked for the current page?

On the first tab sheet, Ctrl+T should make something happen, but upon switching to the second tab, Ctrl+T should make something else happen instead.

Is this a time to toggle TActionList.State between asNormal and asSuspended when tab sheets are shown or hidden?

Sorry, but I don't quite follow you. TabSheets don't have tool buttons. Toolbars have tool buttons. Could you be more specific in what you are asking? — David Heffernan, Jun 15 '11 at 15:30
The way I habitually associate tool button actions to keyboard shortcuts is to use actions and assign a shortcut to the action. Is that what you want to do? — David Heffernan, Jun 15 '11 at 18:29
@mafax: no it is not; your question is still a mixup of ToolBar and TabSheet. Now: what are you really after? — Jeroen Wiert Pluimers, Jun 16 '11 at 08:46

score 1 · Accepted Answer · answered Jun 15 '11 at 23:25

1

If you want Ctrl+T simply to flip between active TabSheets on a PageControl, then create a single Action, with a Ctrl+T shortcut, and flip between pages as required:

procedure TForm1.actNextPageExecute(Sender: TObject)
var
   nextPageIndex: Integer;
begin
   nextPageIndex := PageControl1.ActivePageIndex+1;

   if (nextPageIndex > PageControl1.Pages.Count-1) then
       nextPageIndex := 0;

   PageControl1.ActivePageIndex := nextPageIndex;
end;

answered Jun 15 '11 at 23:25

Ian Boyd

246,734
253
869
1,219

1

No no, I wrote, I need shortscuts for ToolButtons (ToolBar). Each TabSheet has one ToolBar. ToolButtons on TabSheet1 and TabSheet2 can have the same shortcuts (Ctrl+T). – maxfax Jun 15 '11 at 23:31
ActionToolBars and an ActionManager do seem to be the answer to this just need to manage the action shortcuts depending on which tab is showing – Despatcher Jun 16 '11 at 16:09

afrazier · Answer 2 · 2011-06-17T13:02:56.657

0

If you want one TAction to do different things depending on what control initiated it, just look at the action's ActionComponent property. Hook all the controls to the same action.

An alternative would be to have multiple actions with the same shortcut and enable or disable them in the Update event based on what is visible or focused.

edited Jun 17 '11 at 13:02

answered Jun 16 '11 at 21:31

afrazier

4,784
2
27
30

How do I make a shortcut key do different things depending on the active tab page?

2 Answers2