lyfz_repos/经典版源码/lyfzddfClient/trunk/625/ClientReasonChart.cpp

// ClientReasonChart.cpp : implementation file
//
#include "stdafx.h"
#include "ylgl.h"
#include "ClientReasonChart.h"
#include "MyMdi.H"
#include "VcPlot.h"
#include "VcAxis.h"
#include "VcValueScale.h"
#include "VcSeriesCollection.h"
#include "VcSeries.h"
#include "VcPen.h"
#include "VcCategoryScale.h"
#include "VcColor.h"
#include "VcDataGrid.h"
#include "VcBackdrop.h"
#include "VcFill.h"
#include "VcBrush.h"
#include "VcDataPoints.h"
#include "VcDataPoint.h"
#include "VcDataPointLabel.h"
#include "VcAxisTitle.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// ClientReasonChart IDC_STATIC1
IMPLEMENT_DYNCREATE(ClientReasonChart, MyFormView)

ClientReasonChart::ClientReasonChart()
	: MyFormView(ClientReasonChart::IDD)
{
	//{{AFX_DATA_INIT(ClientReasonChart)
	m_year = atoi(g_date.Mid (0,4));
	m_month = atoi(g_date.Mid (5,2));
	m_day = 12;
	m_radio1 = 1;
	m_bInit=0;
	//}}AFX_DATA_INIT
	g_pMainWnd->GetOcx();
}

ClientReasonChart::~ClientReasonChart()
{
}

void ClientReasonChart::DoDataExchange(CDataExchange* pDX)
{
	MyFormView::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(ClientReasonChart)
	DDX_Control(pDX, IDC_SPIN3, m_spinday);
	DDX_Control(pDX, IDC_SPIN2, m_spinmonth);
	DDX_Control(pDX, IDC_SPIN1, m_spinyear);
	DDX_Control(pDX, IDC_STATIC1, m_static1);
	DDX_Text(pDX, IDC_EDITyear, m_year);
	DDV_MinMaxUInt(pDX, m_year, 1900, 3000);
	DDX_Text(pDX, IDC_EDITmonth, m_month);
	DDV_MinMaxUInt(pDX, m_month, 1, 12);
	DDX_Text(pDX, IDC_EDITday, m_day);
	DDV_MinMaxUInt(pDX, m_day, 1, 31);
	DDX_Radio(pDX, IDC_RADIO3, m_radio1);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(ClientReasonChart, MyFormView)
	//{{AFX_MSG_MAP(ClientReasonChart)
	ON_BN_CLICKED(IDC_BUTclose, OnBUTclose)
	ON_EN_CHANGE(IDC_EDITyear, OnChangeEDITyear)
	ON_EN_CHANGE(IDC_EDITmonth, OnChangeEDITmonth)
	ON_EN_CHANGE(IDC_EDITday, OnChangeEDITday)
	ON_BN_CLICKED(IDC_RADIO3, OnRadio3)
	ON_BN_CLICKED(IDC_RADIO4, OnRadio4)
	ON_WM_DESTROY()
	ON_BN_CLICKED(IDC_RADIO5, OnRadio5)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// ClientReasonChart diagnostics

#ifdef _DEBUG
void ClientReasonChart::AssertValid() const
{
	MyFormView::AssertValid();
}

void ClientReasonChart::Dump(CDumpContext& dc) const
{
	MyFormView::Dump(dc);
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// ClientReasonChart message handlers

void ClientReasonChart::OnInitialUpdate() 
{
	MyFormView::OnInitialUpdate();
	// TODO: Add your specialized code here and/or call the base class
	CMyMdi Mdi;
	Mdi.SetSubView((CWnd*)GetParent(), (CWnd*)this);
	
	// Here we create the outbar control using the splitter as its parent
	// and setting its id to the first pane.
	CRect rc2;
	GetWindowRect(rc2);
	::MoveWindow(m_hWnd,g_rc.left,g_rc.top,g_rc.Width(),g_rc.Height(),TRUE);

 	EnumChildWindows(m_hWnd,(WNDENUMPROC)EnumChildProc,0);
	 


	m_static1.SetFont (&g_titlefont);
 
	m_spinyear.SetRange (1900, 3000);
	m_spinmonth.SetRange (1, 12);
	m_spinday.SetRange (1, 31);


    CString version = _T ("Version 1.0");
	m_day=AfxGetApp()->GetProfileInt (version, "rowcount3", 12);
	UpdateData(false);
 

	m_bInit=1;
	DateChange();
}

void ClientReasonChart::FillGrid()
{
 
}

void ClientReasonChart::OnBUTclose() 
{
	// TODO: Add your control notification handler code here
	GetParent()->SendMessage(WM_CLOSE);
}

void ClientReasonChart::OnChangeEDITyear() 
{
	// TODO: If this is a RICHEDIT control, the control will not
	// send this notification unless you override the MyFormView::OnInitDialog()
	// function and call CRichEditCtrl().SetEventMask()
	// with the ENM_CHANGE flag ORed into the mask.
	    DateChange();
	// TODO: Add your control notification handler code here
	
}

void ClientReasonChart::OnChangeEDITmonth() 
{
	// TODO: If this is a RICHEDIT control, the control will not
	// send this notification unless you override the MyFormView::OnInitDialog()
	// function and call CRichEditCtrl().SetEventMask()
	// with the ENM_CHANGE flag ORed into the mask.
	DateChange();
	// TODO: Add your control notification handler code here
	
}

void ClientReasonChart::OnChangeEDITday() 
{
	// TODO: If this is a RICHEDIT control, the control will not
	// send this notification unless you override the MyFormView::OnInitDialog()
	// function and call CRichEditCtrl().SetEventMask()
	// with the ENM_CHANGE flag ORed into the mask.
	if(m_bInit==0)return;
    DateChange();
	UpdateData();
    CString version = _T ("Version 1.0");
	AfxGetApp()->WriteProfileInt (version, "rowcount3", m_day);
	// TODO: Add your control notification handler code here
	
}

void ClientReasonChart::DateChange()
{
	if(m_bInit==0)return;
	m_spinyear.EnableWindow(0);
	m_spinmonth.EnableWindow(0);
	m_spinday.EnableWindow(0);
	UpdateData();
  
	CString date1,date2;
	date1.Format ("%d-%02d-01", m_year, m_month);
	date2.Format ("%d-%02d-31", m_year, m_month);
 
    CString filter="[date]>='"+date1+"' and [date]<='"+date2+"' and [reason]<>''";

	g_sendhead.code[0]=91;
	g_sendhead.tabcount=1;
	g_sendhead.bsql=0;
	g_pMainWnd->ProcessChatMessageRequest2(filter);
	if(g_bSendOK==0)
	{
		m_spinyear.EnableWindow(1);
	    m_spinmonth.EnableWindow(1);
	    m_spinday.EnableWindow(1);
		return;
	}
 	DataToArray(&m_List1array);
 	KindChange();
	m_spinyear.EnableWindow(1);
	m_spinmonth.EnableWindow(1);
	m_spinday.EnableWindow(1);
}

void ClientReasonChart::KindChange()
{
	if(m_day<1)return;
	int chartcount=m_List1array.GetSize ()/m_day;
	if(m_List1array.GetSize ()%m_day)chartcount++;

	int i = 0;
	for( i=0; i<m_pChartArray.GetSize (); i++)
	{
		CMSChart *pChart=m_pChartArray.ElementAt (i);
		pChart->ShowWindow (SW_HIDE);
	}
	if(chartcount==0)
		return;
	while(m_pChartArray.GetSize ()<chartcount)
	{
		CMSChart *pChart=new CMSChart;
		CRect rc(0,0,0,0);
		WCHAR pwchLicenseKey[] =
		{
			0x0038,	0x0045,	0x0031,	0x0034,	0x0037,	0x0043,	
			0x0036,	0x0039,	0x002D,	0x0042,	0x0044,	0x0035,	
			0x0030,	0x002D,	0x0031,	0x0031,	0x0064,	0x0031,	
			0x002D,	0x0042,	0x0031,	0x0033,	0x0037,	0x002D,	
			0x0030,	0x0030,	0x0030,	0x0030,	0x0046,	0x0038,	
			0x0037,	0x0035,	0x0033,	0x0046,	0x0035,	0x0044
		};
		BSTR bstrLicense = ::SysAllocStringLen(pwchLicenseKey,
			sizeof(pwchLicenseKey)/sizeof(WCHAR));


		pChart->Create ("", WS_VISIBLE|WS_CHILD, rc, this, m_pChartArray.GetSize (), NULL, 0, bstrLicense );

		::SysFreeString(bstrLicense);
		m_pChartArray.Add (pChart);
		InitChartStyle(pChart);
		SetChartStyle(pChart);
	}
	CRect rc;
	GetDlgItem(IDC_STATIC2)->GetWindowRect(rc);
	ScreenToClient(rc);
	int hei=rc.Height ()/chartcount;
	for( i=0; i<chartcount; i++)
	{
		CMSChart *pChart=m_pChartArray.ElementAt (i);
		rc.bottom =rc.top +hei;
		pChart->MoveWindow (rc);
		pChart->ShowWindow (SW_SHOW);
		rc.top +=hei;

		int nRowCount=min(m_day, m_List1array.GetSize ()-i*m_day);
		pChart->SetRowCount(nRowCount);

		for(int row = 1; row <= nRowCount; ++row)
		{
			pChart->SetRow(row);
			pChart->SetRowLabel(m_List1array.ElementAt (i*m_day+row-1).ElementAt (0));
			pChart->GetDataGrid().SetData(row, 1,  atof(m_List1array.ElementAt (i*m_day+row-1).ElementAt (1)), 0);
		}
		pChart->Refresh();
	}
	OnRadio3();
}

void ClientReasonChart::OnRadio3() 
{
	// TODO: Add your control notification handler code here
 	UpdateData();
	if(m_radio1==0)
	{
	for(int i=0; i<m_pChartArray.GetSize (); i++)
	{
		CMSChart *pChart=m_pChartArray.ElementAt (i);
		pChart->SetChartType(3);
	}
	}
	else if(m_radio1==1)
	{
	for(int i=0; i<m_pChartArray.GetSize (); i++)
	{
		CMSChart *pChart=m_pChartArray.ElementAt (i);
		pChart->SetChartType(1);
	}
	}
	else if(m_radio1==2)
	{
	for(int i=0; i<m_pChartArray.GetSize (); i++)
	{
		CMSChart *pChart=m_pChartArray.ElementAt (i);
		pChart->SetChartType(14);
	}
	}
}

void ClientReasonChart::OnRadio4() 
{
	// TODO: Add your control notification handler code here
	OnRadio3();
}

void ClientReasonChart::OnRadio5() 
{
	// TODO: Add your control notification handler code here
	OnRadio3();	
}

void ClientReasonChart::SetChartStyle(CMSChart *pChart)
{
		pChart->SetColumnCount(1); 
		pChart->SetColumn(1);
	//	pChart->SetColumnLabel((LPCTSTR)"全部");

		pChart->GetPlot().GetSeriesCollection().GetItem(1).GetDataPoints ().GetItem(-1).GetBrush ().GetFillColor ().Set(255, 0, 0);
		// 线宽(对点线图有效)
		pChart->GetPlot().GetSeriesCollection().GetItem(1).GetPen().SetWidth(30);
		// 数据点类型显示数据值的模式(对柱柱状图和点线图有效)
		// 0: 不显示	1: 显示在柱状图外
		// 2: 显示在柱状图内上方	3: 显示在柱状图内中间	4: 显示在柱状图内下方
		pChart->GetPlot().GetSeriesCollection().GetItem(1).GetDataPoints().GetItem(-1).GetDataPointLabel().SetLocationType(1);
 
}

void ClientReasonChart::InitChartStyle(CMSChart *pChart)
{
	VARIANT var;
	pChart->GetBackdrop().GetFill().SetStyle(1);
	pChart->GetBackdrop().GetFill().GetBrush().GetFillColor().Set(255, 255, 255);
	pChart->SetShowLegend(false);
	pChart->SetChartType(3);
	// 栈模式
	pChart->SetStacking(FALSE);
	pChart->GetPlot().GetAxis(1,var).GetValueScale().SetAuto(1);	// 不自动标注Y轴刻度
	pChart->GetPlot().GetAxis(0,var).GetCategoryScale().SetAuto(0);			// 不自动标注X轴刻度
 	pChart->GetPlot().GetAxis(0,var).GetCategoryScale().SetDivisionsPerLabel(1);// 每刻度一个标注
 	pChart->GetPlot().GetAxis(0,var).GetCategoryScale().SetDivisionsPerTick(1); // 每刻度一个刻度线
}

void ClientReasonChart::OnDestroy() 
{

	for(int i=0; i<m_pChartArray.GetSize (); i++)
	{
		CMSChart *pChart=m_pChartArray.ElementAt (i);
		pChart->DestroyWindow ();
		delete pChart;
	}
	m_pChartArray.RemoveAll ();	
	MyFormView::OnDestroy();
}

BOOL ClientReasonChart::PreTranslateMessage(MSG* pMsg) 
{
	// TODO: Add your specialized code here and/or call the base class
	try
	{
	if(pMsg->message==WM_KEYDOWN)
	{
		switch (pMsg->wParam)
		{
		case 0x43: // copy
			if ( ( GetKeyState( VK_CONTROL ) & 0x80 ) )
			{
				GetFocus()->SendMessage(WM_COPY);
				return TRUE;
			}
			break;
		case 0x56: //Ctrl + V:
			if ( ( GetKeyState( VK_CONTROL ) & 0x80 ) )
			{
				GetFocus()->SendMessage(WM_PASTE);
				return TRUE;
			}
			break;
		case 0x58: // cut
			if ( ( GetKeyState( VK_CONTROL ) & 0x80 ) )
			{
				GetFocus()->SendMessage(WM_CUT);
				return TRUE;
			}
			break;
		case 0x5A: //undo
		case 0x59: //redo
			if ( ( GetKeyState( VK_CONTROL ) & 0x80 ) )
			{
				GetFocus()->SendMessage(WM_UNDO);
				return TRUE;
			}
			break;
		}
	}
	return MyFormView::PreTranslateMessage(pMsg);
	}
	catch(...)
	{
	}
}