工控编程吧

标题: 135上位机VC MFC输出动态多彩的文字方法 [打印本页]

---

作者: qq263946146    时间: 2015-12-29 22:16
标题: 135上位机VC MFC输出动态多彩的文字方法

(, 下载次数: 0)

上传

点击文件名下载附件

135上位机VC MFC输出动态多彩的文字方法

功能展示

程序界面文字一般都是黑白静态显示的，我们当前例程，实现动态且各种颜色变幻输出文本功能，点击动起来，文字霓虹灯效果动态显示，且会跟随鼠标移动，点击静一静，停止文字特效，效果如图；

要点提示

文字的霓虹灯般动态效果是使用窗口设备上下文的通道方法来实现的，创建通道后在通道内实现文字颜色的变幻；

实现功能

1.新建基于对话框的应用程序

2.拖拽两个按钮进行定时器的打开与关闭操作void CGkbc8Dlg::OnButton1()

{ SetTimer(1,250,NULL) ;} void CGkbc8Dlg::OnButton2() {KillTimer(1); }

3.添加一变量CPoint m_Point;用于输出文字的起始点，在鼠标移动消息中赋值void CGkbc8Dlg::OnMouseMove(UINTnFlags, CPoint point)

{ m_Point=point; CDialog::OnMouseMove(nFlags, point); }

4.添加定时器消息，实现多彩的文字效果；

1. c8Dlg::OnTimer(UINT nIDEvent)
   
2. {
   
3.         CFont Font;
   
4.         CDC* pDC = GetDC();
   
5.         CRect rect;
   
6.         GetClientRect(&rect);
   
7.         pDC->FillRect(rect,&CBrush(RGB(0,0,0)));//填充黑色
   
8. 
   
9.         Font.CreatePointFont(400,"宋体",pDC);
   
10.         pDC->SelectObject(&Font);
    
11.         
    
12.         pDC->BeginPath();
    
13.         pDC->SetBkMode(TRANSPARENT);
    
14.         pDC->TextOut(m_Point.x,m_Point.y,"动态多彩文字");
    
15.         pDC->EndPath();
    
16.         pDC->SelectClipPath(RGN_COPY);
    
17.         pDC->AbortPath();
    
18.         
    

复制代码

1. Font.DeleteObject();
   
2.         //
   
3. 
   
4.         int R,G,B;
   
5.         for(int i=0;i<rect.Height();i=i+5)
   
6.         {
   
7.                 R = rand()/2;
   
8.                 G = rand()/2;
   
9.                 B = rand()/2;
   
10.                 CPen pen;
    
11.                 pen.CreatePen(PS_SOLID,5,RGB(255*R,255*G,255*B));
    
12.                 pDC->SelectObject(&pen);
    
13.                 pDC->MoveTo(rect.Width(),i);
    
14.                 pDC->LineTo(0,i);
    
15.                 pen.DeleteObject();
    
16.         }
    
17.         CDialog::OnTimer(nIDEvent);
    
18. }
    

复制代码

我们来演示下功能实现的整个过程

[iqiyi]http://player.video.qiyi.com/5863d5019d1c6fc9a98b3cb1fa44bb4b/0/0/w_19rtcwgwtd.swf-albumId=5107813709-tvId=5107813709-isPurchase=0-cnId=12[/iqiyi]

(, 下载次数: 0)

上传

点击文件名下载附件

[note]1[/note]

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4