Solved

Alt+Tab between TTabSheets

Posted on 2004-05-01
5
231 Views
Last Modified: 2010-04-05
Hi guys,

I have 4 tabsheets lets say and I want to walk through them with Alt+Tab (Just Like Windows).
For example I first clicked on tabsheet 2 then 3 then 4. when I press Alt+Tab I want to go to 3 and if i press alt+tab again i want to goto 4.



Anyone knows anything?
0
Comment
Question by:bilgehanyildirim
5 Comments
 
LVL 12

Expert Comment

by:Lee_Nover
ID: 10968403
just like windows ?
you're thinking about Ctrl+Tab and not Alt+Tab !
Ctrl+Tab works just fine
0
 

Author Comment

by:bilgehanyildirim
ID: 10968417
It goes in a row. I want to go back and forward. there are loads of copy/paste job to do from one TS to other one.
0
 
LVL 6

Expert Comment

by:pritaeas
ID: 10968768
Ctrl+Tab goes forward, Ctrl+Shift+Tab goes backward.

But you can always use shortcuts to go directly to a specific tab. E.g. you have a submenu containing your various tabsheets, then you can easily add a shortcut for each menu-item (Ctrl+1, Ctrl+2 and so on).

You can also use an ActionList, where each action sets a specific tabsheet. Then also set a shortcut for each action.

hth, pritaeas
0
 

Author Comment

by:bilgehanyildirim
ID: 10968924
I haven't use actionllist before. could you please give an example. for example lets say when I press Ctrl+Q TS 1 will be activated and when I press Ctrl+Q again TS 2 will be activated and so on..
0
 
LVL 4

Accepted Solution

by:
ceoworks earned 500 total points
ID: 10969308
Hi Bilgehan,

All you need to do is :

- Put an TActionList control(on Delphi's Standard tab) on your form
- Double click on your action list. Then ActionList editor will appear
- Add a new action from this editor
- When your new action is selected, from the object inspector define a name for this action and then select a ShortCut for this. I selected Ctrl+Q as you preferred.
- Then double click on your new action item and then put your code into that new action's OnExecute event :

  procedure TForm1.NextTabExecute(Sender: TObject);
  begin
    PageControl1.TabIndex := PageControl1.TabIndex + 1; // TabIndex shows the current active TabSheet at that time..
  end;

That's all.

Cheers,

Oktay Sancak
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, just open a new email message. In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now