Using Shortcut Keys for Property Pages

Its unfortunate that the tab control or the property sheet do not support the shortcut keys. It's fortunate, however, that it is so easy to implement.

Step 1: Assign shortcut keys to property pages

Open up each of the property page resource in the resource editor and update the caption by adding an ampersand before the character that is to be the shortcut key. The shortcut key will appear underlined in the property sheet tab.

Step 2: Override OnPreTranslateMessage

Override the OnPreTranslateMessage() function and add the code shown below. The logic used is fairly simple. If a system key ( an alt key combination ) is pressed, all the tab items are searched for this key. If one is found then the associated page is activated. Note that the call to the base class version of this function is at the bottom. Therefore, if a page and a control in the active page have the same shortcut key, the page wins.
BOOL CModalShapePropSheet::PreTranslateMessage(MSG* pMsg)
{
	if( pMsg->message == WM_SYSKEYDOWN && pMsg->wParam > 32 )
	{
		CTabCtrl *pTab = GetTabControl();
		int n = pTab->GetItemCount();

		TCHAR buf[80], shortcut[3];
		TC_ITEM tcItem;
		tcItem.mask = TCIF_TEXT;
		tcItem.pszText = buf;
		shortcut[0] = _T('&');
		shortcut[2] = _T('\0');
		for( int i = 0; i < n; i++ )
		{
			tcItem.cchTextMax = 79;
			pTab->GetItem( i, &tcItem );
			shortcut[1] = (TCHAR) pMsg->wParam;
			if( _tcsstr( buf, shortcut ) )
			{
				SetActivePage( i );
				return TRUE;
			}
		}
	}
	return CPropertySheet::PreTranslateMessage(pMsg);
}



Comments

  • lower case shortcuts

    Posted by Legacy on 12/07/1999 12:00am

    Originally posted by: Rolf Behrens

    thanks for this routine, but you forgot the lowercase shortcuts
    
    I just add
    ...
    shortcut[1] = tolower(shortcut[1]);
    if( _tcsstr( buf, shortcut ) )
    {
    SetActivePage( i );
    return TRUE;
    }
    ...

    then it works with lowercase as well.

    CU Rolf

    Reply
  • Help on PropertySheet.

    Posted by Legacy on 10/18/1999 12:00am

    Originally posted by: pabitra kumar dash

    Hi,

    I created a propertysheet in which I am able to add
    two property pages. When a third property page added into
    it, my application behaves abnormally. Can I know what will
    be the problem in it?

    Please help.

    Regards,
    pabitra

    Reply
  • How do I add an index to my property page

    Posted by Legacy on 05/13/1999 12:00am

    Originally posted by: dominic

    I'm just a beginner so hopefully someone can help me

    I would like my tools button to display the property page when it's press.
    I have attached a variable=page number/index to that button and if it's press,
    the function SetActivePage(index) will execute. Now I don't know how to add an index to my property page. Can anyone help?

    Reply
Leave a Comment
  • Your email address will not be published. All fields are required.

Top White Papers and Webcasts

  • Salesforce has been recognized by Gartner as a leader in this report for three years in a row. This graphic was published by Gartner, Inc. as part of a larger research document and should be evaluated in the context of the entire document. The Gartner document is available upon request from Salesforce.com. Gartner does not endorse any vendor, product or service depicted in its research publications, and does not advise technology users to select only those vendors with the highest ratings. Gartner research …

  • You've managed to piece together the "DREAM TEAM." Your tech staff works like a well-oiled machine, keeping your company humming and thriving. And then it happens: dissension. For whatever reason, your employees have grown unhappy and you find out they're searching for new employment or losing productivity. What did you do wrong? Did you hire the wrong people? Did your company push them away? Or is it a combination of numerous factors? Read this white paper to learn how to build an environment that fosters …

Most Popular Programming Stories

More for Developers

RSS Feeds

Thanks for your registration, follow us on our social networks to keep up-to-date