WTL 一个很好用的ToolTip(迁移2011-03-13)

Table of Contents

    找到了一个老外写的很好用的ToolTip, 但是有两个小问题,终于解决了,拿出来和大家分享下。

    • 问题1:有时候出现这样的情况,鼠标划上去后立马弹出提示,然后消失,最后又弹出一次;

    解决方法:m_TT.SetDelayTime(TTDT_RESHOW, 1000);//鼠标划上过1秒后弹出提示;

    • 问题2:提示框弹出后默认只显示5秒钟就消失了, 这样时间太短了,提示的内容还没看完就消失了。

    解决方法:m_TT.SetDelayTime(TTDT_AUTOPOP, 10000);//弹出提示后停留10秒钟

    源码:

    #ifndef __TTDLG_H__
    #define __TTDLG_H__
    #pragma once
    #ifndef __ATLCTRLS_H__
    	#error ToolTipDlg.h requires atlctrls.h to be included first
    #endif
    #ifndef TTS_BALLOON
    #define TTS_BALLOON 0
    #endif
    namespace WTL
    {
    template < class T ,class TT = CToolTipCtrl >
    class CToolTipDlg
    {
    // Data declarations and members
    public:
    	TT& GetTT(){return m_TT;}
    protected:
    	TT m_TT;
    	UINT m_uTTStyle;
    	UINT m_uToolFlags;
    // Construction
    	CToolTipDlg( UINT uTTSTyle= TTS_NOPREFIX | TTS_BALLOON | TTS_ALWAYSTIP,
    					UINT uToolFlags = TTF_IDISHWND | TTF_SUBCLASS) 
    					: m_TT( NULL ), m_uTTStyle( uTTSTyle ), 
    					m_uToolFlags( uToolFlags | TTF_SUBCLASS )
    		{}
    	void TTInit()
    		{
    		T* pT= (T*)this;
    		ATLASSERT( ::IsWindow( *pT ));
    		m_TT.Create( *pT, NULL, NULL, m_uTTStyle );
    		CToolInfo ToolInfo( pT->m_uToolFlags, *pT , 0, 0, MAKEINTRESOURCE(pT->IDD) );
    		m_TT.AddTool( &ToolInfo );
    		m_TT.SetDelayTime(TTDT_RESHOW, 1000);//鼠标划上后1秒弹出提示
    		m_TT.SetDelayTime(TTDT_AUTOPOP, 10000);//弹出提示后停留10秒钟
    		::EnumChildWindows( *pT, SetTool, (LPARAM)pT );
    		TTSize( 0 );
    		TTActivate( TRUE );
    		}
    // Operations
    public:
    	void TTActivate(BOOL bActivate)
    		{ m_TT.Activate( bActivate ); }
    	void TTSize( int nPixel )
    		{ m_TT.SetMaxTipWidth( nPixel );}
    	void TTSetTxt( HWND hTool, _U_STRINGorID text )
    		{ m_TT.UpdateTipText( text, hTool);}
    	void TTSetTxt( UINT idTool, _U_STRINGorID text )
    		{ TTSetTxt( GetHWND( idTool ) , text);}
    	BOOL TTAdd( HWND hTool )
    		{ return SetTool( hTool, (LPARAM)(T*)this );}
    	BOOL TTAdd( UINT idTool )
    		{ return TTAdd( GetHWND( idTool ));}
    	void TTRemove( HWND hTool )
    		{ m_TT.DelTool( hTool );}
    	void TTRemove( UINT idTool )
    		{ TTRemove( GetHWND( idTool ));}
    // Message map and handlers
    	BEGIN_MSG_MAP(CToolTipDlg)
    		MESSAGE_RANGE_HANDLER(WM_MOUSEFIRST,WM_MOUSELAST, OnMouse)
    		MESSAGE_HANDLER(WM_INITDIALOG, OnInitDialog)
    	END_MSG_MAP()
    		
    	LRESULT OnInitDialog(UINT , WPARAM , LPARAM, BOOL& bHandled)
    	{
    		TTInit();
    		bHandled = FALSE;
    		return TRUE;
    	}
    	LRESULT OnMouse(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& bHandled)
    	{
    		T* pT = (T*)this;
    		bHandled = FALSE;
    		if(m_TT.IsWindow())
    			m_TT.RelayEvent((LPMSG)pT->GetCurrentMessage());
    		return 0;
    	}
    // Implementation
    private:
    	HWND GetHWND( UINT idTool )
    		{ return ::GetDlgItem( *(T*)this, idTool );}
    	static BOOL CALLBACK SetTool( HWND hTool, LPARAM pDlg)
    		{
    		T* pT = (T*)pDlg;
    		int idTool = ::GetWindowLong(hTool, GWL_ID);
    		if ( idTool != IDC_STATIC )
    			{
    			CToolInfo ToolInfo( pT->m_uToolFlags, hTool, 0, 0, (LPTSTR)idTool );
    			pT->m_TT.AddTool( &ToolInfo );
    			}
    		return TRUE;
    		}
    };
    } // namespace WTL
    #endif // __TTDLG_H__
    

    用法:

    1. 将上面的代码写入一个头文件中, 如:ToolTipDlg.h
    2. 在需要用的对话框中包含这个头文件, 并使其继承于CToolTipDlg类, 如:
    #include "ToolTipDlg.h"
    class CAboutDlg : public CDialogImpl<CAboutDlg>,
    	public CToolTipDialog<CAboutDlg>//here
    {
    public:
    	enum { IDD = IDD_ABOUTBOX };
    	BEGIN_MSG_MAP(CAboutDlg)
    		CHAIN_MSG_MAP(CToolTipDialog<CAboutDlg>)//here 一定要放在开始
    		MESSAGE_HANDLER(WM_INITDIALOG, OnInitDialog)
    		COMMAND_ID_HANDLER(IDOK, OnCloseCmd)
    		COMMAND_ID_HANDLER(IDCANCEL, OnCloseCmd)
    	END_MSG_MAP()
    ...
    }
    1. 如果要显示当鼠标滑动到某个静态文本控件上时弹出提示。首先,将IDC_STATIC改为其他的(如:IDC_TOOL_TIP);然后,将属性中的Notify设置为TRUE;最后,打开String Table, ID为先前修改后的ID(如:IDC_TOOL_TIP), 标题为提示框中要显示的内容, 换行的话可以加/n。

    简单的用法就是上面这样子的, 至于其他的用法可以看源码给出的函数。