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

  • Data integrity and ultra-high performance dictate the success and growth of many companies. One of these companies is BridgePay Network Solutions, a recently launched and rapidly growing financial services organization that allows merchants around the world to process millions of daily credit card transactions. Due to the nature of their business, their IT team needed to strike the perfect balance between meeting regulatory-mandated data security measures with the lowest possible levels of latency and …

  • The 2014 State of DevOps Report — based on a survey of 9,200+ people in IT operations, software development and technology management roles in 110 countries — reveals: Companies with high-performing IT organizations are twice as likely to exceed their profitability, market share and productivity goals. IT performance improves with DevOps maturity, and strongly correlates with well-known DevOps practices. Job satisfaction is the No. 1 predictor of performance against organizational …

Most Popular Programming Stories

More for Developers

RSS Feeds

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