最近寫一個小的對話框程序時，想加一個文本超鏈接，研究了一下，發(fā)上自己的研究成果，供大家參考。下面說說完整的步驟。
(假定靜態(tài)文本ID為ID_STATIC)
首先，設(shè)置鼠標(biāo)的形狀及響應(yīng)鼠標(biāo)點擊
第一步，在Dlg類中定義一個protect成員變量HCURSOR m_hCursor,
在構(gòu)造函數(shù)里（或者在OnInitDialog()里）調(diào)用語句
m_hCursor=AfxGetApp()->LoadCursor(IDI_CURLINK);加載鼠標(biāo);
第二步，在Dlg類中定義一個protect成員變量RECT m_StaticRect,表示靜態(tài)文本的坐標(biāo)，在成員函數(shù)OnInitDialog()里調(diào)用語句
GetDlgItem(IDC_STATIC)->GetWindowRect(&m_StaticRect);
ScreenToClient(&m_StaticRect);
第三步，加載鼠標(biāo)移動消息，在OnMouseMove()里調(diào)用語句
if( point.x > m_StaticRect.left && point.x < m_StaticRect.right &&
point.y > m_StaticRect.top && point.y < m_StaticRect.bottom )
{
SetCursor(m_hCursor);
}第四步，加載鼠標(biāo)單擊消息，在OnLButtonDown()里添加語句
if( point.x > m_StaticRect.left && point.x < m_StaticRect.right &&point.y > m_StaticRect.top && point.y < m_StaticRect.bottom )
{
SetCursor(m_hCursor);
ShellExecute(NULL,"open",TEXT("http://www.tlu.edu.cn"),NULL,NULL, SW_SHOWNORMAL);
}
注意，若是郵箱，則改為ShellExecute(NULL, "open",_T("mailto:apeng332@sohu.com"), NULL, NULL, SW_SHOWNORMAL);
在鼠標(biāo)單擊抬起的時候最好也加上SetCursor(m_hCursor);使得鼠標(biāo)的移動更流暢，鼠標(biāo)右鍵消息也可以加上SetCursor(m_hCursor)。
其次，設(shè)置靜態(tài)文本的字體與顏色
第一步，字體的設(shè)置：在Dlg類中定義一個protect成員變量CFont m_Font表示字體，在類的成員函數(shù)OnInitDialog()里調(diào)用m_Font.CreateFont(……),注意參數(shù)很多，參考MSDN。接著編寫兩行代碼：
CStatic *m_static=(CStatic *)GetDlgItem(IDC_STATIC);
m_static->SetFont(&m_Font,false);
第二步，顏色的設(shè)置：在Dlg中加載WM_CTLCOLOR消息，在此消息的響應(yīng)函數(shù)OnCtlColor(……)里添加如下代碼：
HBRUSH CScreenShotsDlg::OnCtlColor(CDC* pDC, CWnd* pWnd, UINT nCtlColor)
{
HBRUSH hbr = CDialog::OnCtlColor(pDC, pWnd, nCtlColor);
if (pWnd->GetDlgCtrlID() == IDC_STATIC)
{
pDC->SetTextColor(RGB(255, 0, 0));
}
return hbr;
}
即可