多功能标签CLabelEx

多功能标签CLabelEx

作者：北方工业大学阙荣文（querw）

下载源代码

引言
　　做用户界面的时候经常要用到一些静态文本控件，显示一些文字信息，但是 MFC 提供的 CStatic类的功能过于简单，无法满足高级需求。为此我从 CStatic 派生了一个类 CLabelEx，扩展了CStatic。第一次投稿，水平不足请大家见谅。我从 vckbase.com 学到了很多很多东西，该是我回报的时候了。

一、功能简介

新增的功能主要有：

1、设置背景图片SetBGBitmap();设置鼠标经过时的背景图片SetMouseOverBGBitmap();设置鼠标单击后的背景图片SetClickedBGBitmap();
2、设置标签图片,SetLabelBitmap();设置鼠标经过时的标签图片SetMouseOverLabelBitmap();设置鼠标单击时的标签图片
3、文字功能
- (1)设置字体颜色,下划线等就不说了.
- (2)感应鼠标经过时自动加上下划线,自动把文字变蓝(就像一个超链接一样)
4、边框和背景
可以设置/取消边框,指定边框颜色;设置背景色,并填充整个标签

二、实现原理

1、其实就是在OnPaint()里画出各种效果： void CLabelEx::OnPaint() { CPaintDC dc(this); // device context for painting dc.SetTextColor(m_crText); dc.SetBkMode(TRANSPARENT); dc.SelectObject(this->GetFont()); ///准备工作 CRect rect; CDC MemDC; CPen BorderPen,*pOldPen,UnderLinePen; CBrush BGBrush,*pOldBrush; BITMAP bm; int nTextLeft=0,nTextTop=0; //文字输出的位置 this->GetClientRect(&rect); MemDC.CreateCompatibleDC(&dc); MemDC.SetMapMode(dc.GetMapMode()); ///画边框 if(m_bBorder) { BorderPen.CreatePen(PS_SOLID,1,m_crBorder); BGBrush.CreateSolidBrush(m_crBG); pOldPen=dc.SelectObject(&BorderPen); pOldBrush=dc.SelectObject(&BGBrush); dc.Rectangle(&rect); dc.SelectObject(pOldPen); dc.SelectObject(pOldBrush); rect.DeflateRect(1,1); } ///贴背景图 if(m_bClicked && m_ClickedBGBm.GetSafeHandle()!=NULL) { MemDC.SelectObject(m_ClickedBGBm); dc.BitBlt(rect.left,rect.top,rect.Width(),rect.Height(), &MemDC,0,0,SRCCOPY); } else if(m_bOver && m_MouseOverBGBm.GetSafeHandle()!=NULL)//鼠标经过的时候 { MemDC.SelectObject(m_MouseOverBGBm); dc.BitBlt(rect.left,rect.top,rect.Width(),rect.Height(), &MemDC,0,0,SRCCOPY); } else if(m_BGBm.GetSafeHandle()!=NULL) { MemDC.SelectObject(m_BGBm); dc.BitBlt(rect.left,rect.top,rect.Width(),rect.Height(), &MemDC,0,0,SRCCOPY); } ///贴标签图片 if(m_bClicked && m_ClickedLabelBm.GetSafeHandle()!=NULL) { m_ClickedLabelBm.GetBitmap(&bm); double fScal=bm.bmWidth*1.0/bm.bmHeight; nTextLeft=int(rect.Height()*fScal)+4; MemDC.SelectObject(m_ClickedLabelBm); dc.StretchBlt(rect.left,rect.top,int(rect.Height()*fScal),rect.Height(), &MemDC,0,0,bm.bmWidth,bm.bmHeight,SRCCOPY); } else if(m_bOver && m_MouseOverLabelBm.GetSafeHandle()!=NULL) { m_MouseOverLabelBm.GetBitmap(&bm); double fScal=bm.bmWidth*1.0/bm.bmHeight; nTextLeft=int(rect.Height()*fScal)+4; MemDC.SelectObject(m_MouseOverLabelBm); dc.StretchBlt(rect.left,rect.top,int(rect.Height()*fScal),rect.Height(), &MemDC,0,0,bm.bmWidth,bm.bmHeight,SRCCOPY); } else if(m_LabelBm.GetSafeHandle()!=NULL) { m_LabelBm.GetBitmap(&bm); double fScal=bm.bmWidth*1.0/bm.bmHeight; nTextLeft=int(rect.Height()*fScal)+4; MemDC.SelectObject(m_LabelBm); dc.StretchBlt(rect.left,rect.top,int(rect.Height()*fScal),rect.Height(), &MemDC,0,0,bm.bmWidth,bm.bmHeight,SRCCOPY); } else { nTextLeft=4; } ///输出文字 TEXTMETRIC tm; dc.GetTextMetrics(&tm); CString strText; this->GetWindowText(strText); nTextTop=rect.top+(rect.Height()-tm.tmHeight)/2; if(strText.GetLength()>0) { dc.TextOut(nTextLeft,nTextTop,strText); } ///画下划线 if(m_bUnderLine) { nTextLeft-=2; nTextTop=nTextTop+tm.tmHeight+1; UnderLinePen.CreatePen(PS_SOLID,1,m_crUnderLine); pOldPen=dc.SelectObject(&UnderLinePen); dc.MoveTo(nTextLeft,nTextTop); dc.LineTo(nTextLeft+tm.tmAveCharWidth*strText.GetLength(),nTextTop); } } 注:对字体加下划线我没有使用直接设置字体下划线的方法,因为我觉得那样不好看,呵呵

2、感应鼠标用的方法如下所示：

在MouseMove里SetCapture()和ReleaseCapture(); void CLabelEx::OnMouseMove(UINT nFlags, CPoint point) { // TODO: Add your message handler code here and/or call default if (m_bOver) // Cursor is currently over control { CRect rect; GetClientRect(rect); if (!rect.PtInRect(point)) { m_bOver = FALSE; if(m_bAutoUnderLine) ///自动下划线 { this->SetUnderLine(FALSE,RGB(0,0,0)); } if(m_bHighLight) //自动高亮 { ///恢复原来的字体颜色 this->SetTextColor(m_crBackText); } RedrawWindow(); ReleaseCapture(); return; } } else // Cursor has just moved over control { m_bOver = TRUE; if(m_bAutoUnderLine) { this->SetUnderLine(TRUE,RGB(0,0,255)); } if(m_bHighLight) { m_crBackText=m_crText; this->SetTextColor(RGB(0,0,255)); } RedrawWindow(); SetCapture(); ::SetCursor(m_hHandCur); } CStatic::OnMouseMove(nFlags, point); } 注：这种方法简单方便,但是有一个问题,看附带的工程,单击Label1弹出一个对话框后Label1无法恢复原状。我一直没解决这个问题.若谁知道请告知我 querw@sina.com

返回顶部

下一篇：一步步制作真彩工具条 >>