Skip to content

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

Published: at 06:01 AM | 4 min read

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

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

解决方法: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。

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