MFC/VC中怎样实现slider滑块控件鼠标点击那里,就刚好落到点击位置

来源:互联网 发布:mac版office2016官网 编辑:程序博客网 时间:2024/06/09 00:14

想要让Slider Control实现在鼠标点击到哪, 滑动就移动到哪的效果,就像播放器的进度条和音量那样

正常的Slider Control点击时,只会移动一个固定的距离长度


于是想到了重载该类,自己实现该功能

网上搜到的一篇文章

http://blog.csdn.net/shen_wei/article/details/6692458

但这样还是有问题,

1. 想要拉动滑块时,用鼠标不好拿到滑块(可能鼠标单击时,直接响应到重载的LButtonDown函数去了)

2.在鼠标点击Slider快到最右边的时候,会直接跳到末端,非常诡异,找不到原因(这种情况网上也有人问,但我找不到那个网页了)


想了很多办法后,感觉这样子实现起来肯定不行

然后去codeproject上找现成的控件,也是费了好长时间才找到

CBitmapSlider

http://www.codeproject.com/Articles/4850/CBitmapSlider

 

以上是位图滑块代码下载地址,下面是才是主题:

首先自己写一个MySlider类。。该类继承 CSliderCtrl类。。

MySlider类响应LButtonDown消息来实现鼠标单击定位。。。

 

[cpp] view plaincopyprint?
  1. void MySlider::OnLButtonDown(UINT nFlags, CPoint point)   
  2. {  
  3.     // TODO: Add your message handler code here and/or call default  
  4.     CSliderCtrl::OnLButtonDown(nFlags, point);  
  5.     CRect   rectClient,rectChannel;   
  6.     GetClientRect(rectClient);   
  7.     GetChannelRect(rectChannel);   
  8.     int nMax = 0;  
  9.     int nMin = 0;  
  10.     GetRange(nMin,nMax);  
  11.     int nPos =     
  12.         (nMax - nMin)*(point.x - rectClient.left - rectChannel.left)/(rectChannel.right - rectChannel.left);   
  13.     SetPos(nPos);  
  14.       
  15. }  


在主界面中:(***Dlg.h)

添加:#include "MySlider.h"

MySlider m_MySlider;

 

(***Dlg.cpp)  关联变量。。。

[cpp] view plaincopyprint?
  1. void CCSliderPosDlg::DoDataExchange(CDataExchange* pDX)  
  2. {  
  3.     CDialog::DoDataExchange(pDX);  
  4.     //{{AFX_DATA_MAP(CCSliderPosDlg)  
  5.         // NOTE: the ClassWizard will add DDX and DDV calls here  
  6.     //}}AFX_DATA_MAP  
  7.     DDX_Control(pDX,IDC_SLIDER1,m_MySlider);   
  8. }  

OnInitDialog()

m_MySlider.SetRange(0,100); //设置Slider的范围。。。


 

原创粉丝点击