roundsliderctrl.cpp

一个很好的虚拟示波器!可一直接运行!他通过串口采集信号与系统单片机上的数据

/******************************************************************

** 文件名:	 RoundSliderCtrl.cpp : 类实现文件

** Copyright (c) 2002 魏巍所有
** 创建人:	魏巍

** 日  期:  2002/7/26

** 修改人:

** 日  期:

** 描  述:	该类为CSliderCtrl的派生类。扩充实现了圆形滑块控件的功能，
			并可以自定义控件内的颜色、图片、设置控件内的文字等。
			使用该类时的注意事项：
			1、需要将MemDc.h文件加入工程中，考虑到该类的普遍性，可以
			   先将其改名。
			2、添加鼠标指针资源 IDC_CURSOR
**			3、该类中用到的某些函数是从Internet上得来，版权仍归其
			   本人所有。
			4、该类在VC6下创建的，由于某些特殊性，在VC.NET下编译将出现
			   不正常现象。

** 版  本:

******************************************************************/	

#include "stdafx.h"
#include "RoundSliderCtrl.h"

#include <math.h>
#include "resource.h"
#include "MemDC.h"
#define USE_MEM_DC // Comment this out, if you don't want to use CMemDC

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

static const double pi = 3.141592653589793238462643383279;

// The following 3 functions were taken from 'CRoundButton.cpp', written and
// copyright (c) 1997,1998 by Chris Maunder.

// To be honest, I never had a look at their implementation, I just use them.
// This is cut-and-paste-programming at its best... if it works... :)   (Daniel)

// prototypes
COLORREF GetColour(double dAngle, COLORREF crBright, COLORREF crDark);
void DrawCircle(CDC* pDC, CPoint p, LONG lRadius, COLORREF crColour, BOOL bDashed = FALSE);
void DrawCircle(CDC* pDC, CPoint p, LONG lRadius, COLORREF crBright, COLORREF crDark);


// Calculate colour for a point at the given angle by performing a linear
// interpolation between the colours crBright and crDark based on the cosine
// of the angle between the light source and the point.
//
// Angles are measured from the +ve x-axis (i.e. (1,0) = 0 degrees, (0,1) = 90 degrees )
// But remember: +y points down!

COLORREF GetColour(double dAngle, COLORREF crBright, COLORREF crDark)
{
#define Rad2Deg	180.0/3.1415 
#define LIGHT_SOURCE_ANGLE	-2.356		// -2.356 radians = -135 degrees, i.e. From top left

	ASSERT(dAngle > -3.1416 && dAngle < 3.1416);
	double dAngleDifference = LIGHT_SOURCE_ANGLE - dAngle;

	if (dAngleDifference < -3.1415) dAngleDifference = 6.293 + dAngleDifference;
	else if (dAngleDifference > 3.1415) dAngleDifference = 6.293 - dAngleDifference;

	double Weight = 0.5*(cos(dAngleDifference)+1.0);

	BYTE Red   = (BYTE) (Weight*GetRValue(crBright) + (1.0-Weight)*GetRValue(crDark));
	BYTE Green = (BYTE) (Weight*GetGValue(crBright) + (1.0-Weight)*GetGValue(crDark));
	BYTE Blue  = (BYTE) (Weight*GetBValue(crBright) + (1.0-Weight)*GetBValue(crDark));

	//TRACE("LightAngle = %0.0f, Angle = %3.0f, Diff = %3.0f, Weight = %0.2f, RGB %3d,%3d,%3d\n", 
	//	  LIGHT_SOURCE_ANGLE*Rad2Deg, dAngle*Rad2Deg, dAngleDifference*Rad2Deg, Weight,Red,Green,Blue);

	return RGB(Red, Green, Blue);
}

void DrawCircle(CDC* pDC, CPoint p, LONG lRadius, COLORREF crColour, BOOL bDashed)
{
	const int nDashLength = 1;
	LONG lError, lXoffset, lYoffset;
	int  nDash = 0;
	BOOL bDashOn = TRUE;

	//Check to see that the coordinates are valid
	ASSERT( (p.x + lRadius <= LONG_MAX) && (p.y + lRadius <= LONG_MAX) );
	ASSERT( (p.x - lRadius >= LONG_MIN) && (p.y - lRadius >= LONG_MIN) );

	//Set starting values
	lXoffset = lRadius;
	lYoffset = 0;
	lError   = -lRadius;

	do {
		if (bDashOn) {
			pDC->SetPixelV(p.x + lXoffset, p.y + lYoffset, crColour);
			pDC->SetPixelV(p.x + lXoffset, p.y - lYoffset, crColour);
			pDC->SetPixelV(p.x + lYoffset, p.y + lXoffset, crColour);
			pDC->SetPixelV(p.x + lYoffset, p.y - lXoffset, crColour);
			pDC->SetPixelV(p.x - lYoffset, p.y + lXoffset, crColour);
			pDC->SetPixelV(p.x - lYoffset, p.y - lXoffset, crColour);
			pDC->SetPixelV(p.x - lXoffset, p.y + lYoffset, crColour);
			pDC->SetPixelV(p.x - lXoffset, p.y - lYoffset, crColour);
		}

		//Advance the error term and the constant X axis step
		lError += lYoffset++;

		//Check to see if error term has overflowed
		if ((lError += lYoffset) >= 0)
			lError -= --lXoffset * 2;

		if (bDashed && (++nDash == nDashLength)) {
			nDash = 0;
			bDashOn = !bDashOn;
		}

	} while (lYoffset <= lXoffset);	//Continue until halfway point
} 

void DrawCircle(CDC* pDC, CPoint p, LONG lRadius, COLORREF crBright, COLORREF crDark)
{
	LONG lError, lXoffset, lYoffset;

	//Check to see that the coordinates are valid
	ASSERT( (p.x + lRadius <= LONG_MAX) && (p.y + lRadius <= LONG_MAX) );
	ASSERT( (p.x - lRadius >= LONG_MIN) && (p.y - lRadius >= LONG_MIN) );

	//Set starting values
	lXoffset = lRadius;
	lYoffset = 0;
	lError   = -lRadius;

	do {
		const double Pi = 3.141592654, 
					 Pi_on_2 = Pi * 0.5;
		//			 Three_Pi_on_2 = Pi * 1.5;
		COLORREF crColour;
		double   dAngle = atan2(lYoffset, lXoffset);

		//Draw the current pixel, reflected across all eight arcs
		crColour = GetColour(dAngle, crBright, crDark);
		pDC->SetPixelV(p.x + lXoffset, p.y + lYoffset, crColour);

		crColour = GetColour(Pi_on_2 - dAngle, crBright, crDark);
		pDC->SetPixelV(p.x + lYoffset, p.y + lXoffset, crColour);

		crColour = GetColour(Pi_on_2 + dAngle, crBright, crDark);
		pDC->SetPixelV(p.x - lYoffset, p.y + lXoffset, crColour);

		crColour = GetColour(Pi - dAngle, crBright, crDark);
		pDC->SetPixelV(p.x - lXoffset, p.y + lYoffset, crColour);

		crColour = GetColour(-Pi + dAngle, crBright, crDark);
		pDC->SetPixelV(p.x - lXoffset, p.y - lYoffset, crColour);

		crColour = GetColour(-Pi_on_2 - dAngle, crBright, crDark);
		pDC->SetPixelV(p.x - lYoffset, p.y - lXoffset, crColour);

		crColour = GetColour(-Pi_on_2 + dAngle, crBright, crDark);
		pDC->SetPixelV(p.x + lYoffset, p.y - lXoffset, crColour);

		crColour = GetColour(-dAngle, crBright, crDark);
		pDC->SetPixelV(p.x + lXoffset, p.y - lYoffset, crColour);

		//Advance the error term and the constant X axis step
		lError += lYoffset++;

		//Check to see if error term has overflowed
		if ((lError += lYoffset) >= 0)
			lError -= --lXoffset * 2;

	} while (lYoffset <= lXoffset);	//Continue until halfway point
} 

/////////////////////////////////////////////////////////////////////////////
// CRoundSliderCtrl

IMPLEMENT_DYNAMIC(CRoundSliderCtrl, CSliderCtrl)

// 说  明：构造函数，负责初始化时的工作
//
CRoundSliderCtrl::CRoundSliderCtrl()
{
	m_strText          = "%ld";
	m_nKnobRadius      = 15;
	m_nZero            = 220;
	m_bInverted        = false;
	m_bDragging        = false;
	m_bDragByKnobOnly  = false;
	m_bBitmap          = FALSE;
	m_bShowText		   = FALSE;

	::GetObject((HFONT)GetStockObject(DEFAULT_GUI_FONT), sizeof(m_lf), &m_lf);
	m_font.CreateFontIndirect(&m_lf);
	m_crText = ::GetSysColor(COLOR_WINDOWTEXT);

	m_hKnobBrush        = ::CreateSolidBrush(::GetSysColor(COLOR_3DFACE));
	m_hDialBrush        = ::CreateSolidBrush(::GetSysColor(COLOR_3DFACE));
	m_hActiveKnobBrush  = ::CreateSolidBrush(::GetSysColor(COLOR_3DFACE));

	m_hcCross  = AfxGetApp()->LoadCursor( IDC_CURSOR );

}

// 说  明：析构函数不作任何事情
//
CRoundSliderCtrl::~CRoundSliderCtrl()
{
	
}

BEGIN_MESSAGE_MAP(CRoundSliderCtrl, CSliderCtrl)
	//{{AFX_MSG_MAP(CRoundSliderCtrl)
	ON_WM_SIZE()
	ON_WM_ERASEBKGND()
	ON_WM_PAINT()
	ON_WM_LBUTTONDOWN()
	ON_WM_MOUSEMOVE()
	ON_WM_LBUTTONUP()
	ON_WM_KEYDOWN()
	ON_WM_KEYUP()
	ON_WM_MOUSEWHEEL()
	ON_WM_SETCURSOR()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////

// 说  明：初始化函数，详情参见 MSDN
//

void CRoundSliderCtrl::PreSubclassWindow() 
{
	CSliderCtrl::PreSubclassWindow();

	SetRange(0, 359, FALSE);
	SetLineSize(1);
	SetPageSize(10);

	Init();

}

// 说  明：当客户区改变大小时进行完全初始化
//         该函数的详细参数以及功能参见 MSDN；
//
void CRoundSliderCtrl::OnSize(UINT nType, int cx, int cy) 
{
	CSliderCtrl::OnSize(nType, cx, cy);
	
	Init();
}

// 返回值：无
// 参  数：无
// 说  明：控件初始化函数，创建圆形区域
//
void CRoundSliderCtrl::Init()
{
	CRect rc;
	GetClientRect(rc);

	// Resize the window to make it square
	rc.bottom = rc.right = min(rc.bottom, rc.right);

	// Get the vital statistics of the window
	m_ptCenter = rc.CenterPoint();
	m_nRadius = rc.bottom/2-(m_nKnobRadius+1);

	// Set the window region so mouse clicks only activate the round section 
	// of the slider
	m_rgn.DeleteObject(); 
	SetWindowRgn(NULL, FALSE);
	m_rgn.CreateEllipticRgnIndirect(rc);
	SetWindowRgn(m_rgn, TRUE);

	VerifyPos();
}

// SEE MSDN .........
//
#pragma warning(disable:4100) // Unreferenced formal parameter
BOOL CRoundSliderCtrl::OnEraseBkgnd(CDC* pDC) 
{
	return TRUE;
}
#pragma warning(default:4100)

// 说  明：该函数包含整个类中最为重要的处理部分，负责整个客户区的绘画工作
//         关于该函数的其他一些详细内容，情参见MSDN
//
void CRoundSliderCtrl::OnPaint() 
{
	const int nMin = GetRangeMin();
	const int nMax = GetRangeMax()+1;

	const bool bDisabled = !IsWindowEnabled();

	CPaintDC dc(this); // device context for painting

#ifdef USE_MEM_DC
	CMemDC pDC(&dc);
#else
	CDC* pDC = &dc;
#endif

	int nRadius = m_nRadius;

	//填充客户区
	CRect rc;
	GetClientRect(rc);
	pDC->SelectStockObject(NULL_BRUSH);
	pDC->SelectStockObject(NULL_PEN);
	pDC->FillSolidRect(rc, ::GetSysColor(COLOR_BTNFACE));

	// 画背景
	if( m_bBitmap )
	{
		//位图模式
		CBitmap     BitRoundBar;
		BitRoundBar.LoadBitmap( m_uiBitID );
		CBitmap * pOldBmp;
		
		CDC memdc;
		memdc.CreateCompatibleDC(pDC);
		pOldBmp=memdc.SelectObject( &BitRoundBar );
		
		BITMAP bm;
		BitRoundBar.GetBitmap(&bm);
		
		CRect rect;
		GetClientRect(rect);
		
		pDC->SetStretchBltMode( HALFTONE );
		pDC->StretchBlt(0,0,rect.Width(),rect.Height(),&memdc,0,0,bm.bmWidth,bm.bmHeight,SRCCOPY);
		
		memdc.SelectObject(pOldBmp);
		memdc.DeleteDC();
		BitRoundBar.DeleteObject();
	}
	else
	{
		//自画模式
		if(!bDisabled)
		{
			CBrush* pOldBrush = pDC->SelectObject(CBrush::FromHandle(m_hDialBrush));
			pDC->Ellipse(m_ptCenter.x - nRadius + 1, m_ptCenter.y - nRadius + 1, m_ptCenter.x + nRadius + 1, m_ptCenter.y + nRadius + 1);
			pDC->SelectObject(pOldBrush);
		}
		DrawCircle(pDC, m_ptCenter, nRadius--, ::GetSysColor(COLOR_3DHIGHLIGHT), ::GetSysColor(COLOR_3DDKSHADOW));
		DrawCircle(pDC, m_ptCenter, nRadius--, ::GetSysColor(COLOR_3DLIGHT), ::GetSysColor(COLOR_3DSHADOW));
	}

	//计算指针应该存在的位置
	int nPos = (((GetPos()-nMin)*360/(nMax-nMin)) + m_nZero + 360) % 360;
	if(m_bInverted) nPos = 360-nPos;

	const double dPos = ((double)(nPos))*pi/180.0;
	CPoint ptKnobCenter;

#pragma warning(disable:4244) // Disable warning "Converting 'double' to 'int', possible loss of data"
	
	ptKnobCenter = CPoint(m_ptCenter.x + (nRadius-m_nKnobRadius) * sin(dPos), m_ptCenter.y - (nRadius-m_nKnobRadius) * cos(dPos));

#pragma warning(default:4244)

	m_ptKnobCenter = ptKnobCenter;

	nRadius += 2;

	// 画指针
	int nKnobRadius = m_nKnobRadius;
	
	
	nKnobRadius *= 4;
	nKnobRadius /= 5;

	const CRect rcKnob(ptKnobCenter.x - nKnobRadius + 2, ptKnobCenter.y - nKnobRadius + 2, ptKnobCenter.x + nKnobRadius, ptKnobCenter.y + nKnobRadius);

	CRgn rgnKnob;
	rgnKnob.CreateEllipticRgnIndirect(rcKnob);
	//填充指针内部区域
	if(bDisabled)
	{
		pDC->FillRgn(&rgnKnob, CBrush::FromHandle(::GetSysColorBrush(COLOR_BTNFACE)));
	}
	else
	{
		if( m_bDragging )
		{
			//鼠标按下
			pDC->FillRgn(&rgnKnob, CBrush::FromHandle(m_hActiveKnobBrush));
		}
		else
		{
			pDC->FillRgn(&rgnKnob, CBrush::FromHandle(m_hKnobBrush));
		}
	}
	rgnKnob.DeleteObject();

	//画指针边缘区域
	if( m_bDragging )
	{
		//当鼠按下
		DrawCircle(pDC, ptKnobCenter, --nKnobRadius, ::GetSysColor(COLOR_3DDKSHADOW), ::GetSysColor(COLOR_3DHIGHLIGHT));
		DrawCircle(pDC, ptKnobCenter, --nKnobRadius, ::GetSysColor(COLOR_3DSHADOW), ::GetSysColor(COLOR_3DLIGHT));
	}
	else
	{
		DrawCircle(pDC, ptKnobCenter, --nKnobRadius, ::GetSysColor(COLOR_3DDKSHADOW), ::GetSysColor(COLOR_3DHIGHLIGHT));
		DrawCircle(pDC, ptKnobCenter, --nKnobRadius, ::GetSysColor(COLOR_3DLIGHT), ::GetSysColor(COLOR_3DSHADOW));
		pDC.MoveTo(m_ptCenter);
		pDC.LineTo(ptKnobCenter);
	}
	
	// 画指针焦点
	if(!(GetFocus() == this))
	{
		DrawCircle(pDC, ptKnobCenter, nKnobRadius-2, RGB(0, 0, 0), TRUE);
	}
	
	// 画滑块内部的文字
	if( m_bShowText )
	{
		const CString strFormattedText = OnFormatText();
		
		if(!strFormattedText.IsEmpty())
		{
			CFont* pOldFont = pDC->SelectObject(&m_font);
			
			const CSize szExtent = pDC->GetTextExtent(strFormattedText);
			const CPoint ptText = CPoint(m_ptCenter.x - szExtent.cx/2, m_ptCenter.y - szExtent.cy/2);
			const int nOldTextColor = pDC->SetTextColor(m_crText);
			
			pDC->SetBkMode(TRANSPARENT);
			if(bDisabled)
			{
				pDC->DrawState(ptText, szExtent, strFormattedText, DSS_DISABLED, TRUE, 0, (HBRUSH)NULL);
			}
			else
			{
				pDC->TextOut(ptText.x, ptText.y, strFormattedText);
			}
			
			// Clean up
			pDC->SelectObject(pOldFont);
			pDC->SetTextColor(nOldTextColor);
		}
	}
	// Don't call CSliderCtrl::OnPaint()*/
}

// 说  明：按下鼠标后消息处理
//			关于该函数更加详细的说明，请参见MSDN
//
void CRoundSliderCtrl::OnLButtonDown(UINT nFlags, CPoint point) 
{
	if(m_bDragByKnobOnly)			//是否是指针仅跟着拖动
	{
		CPoint pt = m_ptKnobCenter - point;
		if((pt.x*pt.x + pt.y*pt.y) > m_nKnobRadius*m_nKnobRadius) return; // Ignore it...
	}

	if(!m_bDragging)
	{
		m_bDragging = true;			//置鼠标按下标志
		m_bDragChanged = false;		//指示器现在已经改变
		SetCapture();
		SetFocus();
		if(SetKnob(point))			//计算位置，画指针
		{
			m_bDragChanged = true;
			PostMessageToParent(TB_THUMBTRACK);
		}
		RedrawWindow();
	}
	else
	{
		CSliderCtrl::OnLButtonDown(nFlags, point);
	}
}

// 说  明：鼠标移动处理消息
//			关于该函数更加详细的说明，请参见MSDN
//
void CRoundSliderCtrl::OnMouseMove(UINT nFlags, CPoint point) 
{	
	if(m_bDragging)
	{
		//只有在鼠标按下后处理
		if(SetKnob(point))
		{