多功能標籤CLabelEx

來源:互聯網
上載者:User

多功能標籤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 paintingdc.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

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.