?? calendarfrm.cpp
字號:
/***************************************************************************
致看到這些源代碼的兄弟:
你好!
這本來是我為一個商業PDA產品開發的日歷程序,最近移植于PC機上, 所以算法
和數據部分是用純C++寫的,不涉及MFC,所有的代碼都是以短節省存儲空間為主要目
的.
很高興你對這些代碼有興趣,你可以隨意復制和使用些代碼,唯一有一點小小的
愿望:在你使用和復制給別人時,別忘注明這些代碼作者:-)。程序代碼也就罷了,后
面的數據可是我辛辛苦苦從萬年歷上找出來輸進去的。
如果你有什么好的意見不妨Mail給我。
wangfei@hanwang.com.cn
或
wangfei@engineer.com.cn
2000年3月
****************************************************************************/
// CalendarFrm.cpp : implementation file
//
#include "stdafx.h"
#include "Calendar.h"
#include "CalendarFrm.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
/////////////////////////////////////////////////////////////////////////////
// CCalendarFrm
CCalendarFrm::CCalendarFrm()
{
}
CCalendarFrm::~CCalendarFrm()
{
}
BEGIN_MESSAGE_MAP(CCalendarFrm, CWnd)
//{{AFX_MSG_MAP(CCalendarFrm)
ON_WM_PAINT()
ON_WM_CREATE()
//}}AFX_MSG_MAP
ON_MESSAGE(UM_SELCHANGE, OnSelChange)
ON_CBN_SELCHANGE(IDC_MONTHSELECT, OnMonthChange)
ON_EN_CHANGE(IDC_YEAREDIT, OnYearChange)
ON_BN_CLICKED(IDC_BUTTODAY, OnTodayClick)
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CCalendarFrm message handlers
BOOL CCalendarFrm::Create(RECT &rect, CWnd * pParentWnd, UINT nID)
{
CString szClassName = AfxRegisterWndClass(CS_CLASSDC|CS_SAVEBITS|
CS_HREDRAW|CS_VREDRAW,
0, 0, 0);
rect.right = rect.left + 340;
rect.bottom = rect.top +214;
//WS_EX_CLIENTEDGE|WS_EX_WINDOWEDGE
//|WS_DLGFRAME|WS_THICKFRAME
if(!CWnd::CreateEx( 0, szClassName, _T(""),
WS_DLGFRAME|WS_CHILD|WS_VISIBLE|WS_TABSTOP, rect,
pParentWnd, nID, NULL))
return FALSE;
UpdateWindow();
l_CreateDispFont();
for(int i=0; i<12; i++)
m_oBitmaplist[i].LoadBitmap(IDB_BITMAP43+i);
return TRUE;
}
#define STARTX 102
#define STARTY 155
void CCalendarFrm::l_PaintToday(CPaintDC &dc)
{
SYSTEMTIME systime;
::GetSystemTime(&systime);
CString str;
str.Format("今天：%4d年%2d月%2d日", systime.wYear, systime.wMonth, systime.wDay);
dc.Draw3dRect(STARTX+1, STARTY, 228, 22, RGB(128,128,128), RGB(255,255,255));
dc.SetBkColor(::GetSysColor(4));
dc.TextOut(STARTX+4, STARTY+4, str);
}
#undef STARTY
#undef STARTX
void CCalendarFrm::l_PaintBorder(CPaintDC &dc)
{
CRect rect;
GetClientRect(&rect);
/*rect.left ++;
rect.top ++;
dc.FrameRect(&rect, &CBrush(RGB(255,255,255)));
rect -= CPoint(1,1);
dc.FrameRect(&rect, &CBrush(RGB(128,128,128)));
*/
#define LINEY 179
rect.SetRect(rect.left+1, LINEY, rect.right+1, LINEY +2);
dc.Draw3dRect(&rect, RGB(128, 128, 128), RGB(255,255,255));
#define LINEX 96
rect.SetRect(LINEX, 1, LINEX+2, LINEY+2);
dc.Draw3dRect(&rect, RGB(128, 128, 128), RGB(255,255,255));
#undef LINEX
#undef LINEY
}
#define DISP_X 15
#define DISP_Y 60
void CCalendarFrm::l_PaintChineseInfo(CPaintDC &dc)
{
WORD iYear , iMonth, iDay;
WORD iHolDay = CCalendar::GetLunarDate(m_oCalendar.GetYear(),
m_oCalendar.GetMonth(),
m_oCalendar.GetDay(),
iYear, iMonth, iDay);
char text[18];
CCalendar::FormatLunarYear(iYear, text);
dc.SetBkColor(::GetSysColor(4));
dc.TextOut(DISP_X, DISP_Y, text);
CDC imgdc;
imgdc.CreateCompatibleDC(&dc);
imgdc.SelectObject(&m_oBitmaplist[(iYear-4)%12]);
CRect rect(DISP_X+38, DISP_Y-4, DISP_X+38+34, DISP_Y-4+24);
dc.FillRect(&rect, &CBrush(dc.GetBkColor()));
dc.BitBlt(DISP_X+38, DISP_Y-4, 34,24, &imgdc,0,0,SRCAND);
CCalendar::FormatMonth(iMonth, text);
dc.TextOut(DISP_X+23, DISP_Y+30, text);
CCalendar::FormatLunarDay(iDay, text);
dc.TextOut(DISP_X+39, DISP_Y+50, text);
extern const char *HolText[];
if(iHolDay)
{
strcpy(text,"今日 ");
strcat(text, HolText[iHolDay-1]);
dc.TextOut(DISP_X, DISP_Y+80, text);
}
else
dc.TextOut(DISP_X, DISP_Y+80, " ");
}
void CCalendarFrm::OnSelChange(LONG iYearMonth, LONG iDay)
{
//OnPaint();
InvalidateRect(CRect(DISP_X, DISP_Y, DISP_X+80, DISP_Y+100));
}
#undef DISP_X
#undef DISP_Y
void CCalendarFrm::OnPaint()
{
CPaintDC dc(this); // device context for painting
dc.SelectObject(GetDispFont());
l_PaintBorder(dc);
l_PaintChineseInfo(dc);
l_PaintToday(dc);
}
int CCalendarFrm::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
if (CWnd::OnCreate(lpCreateStruct) == -1)
return -1;
//create calendar
CRect rect;
GetClientRect(&rect);
rect.left = rect.CenterPoint().x - 64;
rect.top += 2;
if(!m_oCalendar.Create(rect, this, IDC_CALENDAR))
return -1;
#define LEFT_X 2
#define TOP_Y 2
#define WIDTH 90
#define HEIGHT 22
//create select year spingbutton and buddy
rect.SetRect(LEFT_X, TOP_Y, LEFT_X+WIDTH, TOP_Y+HEIGHT);
if(!m_oYearEdit.Create(rect, this, IDC_YEAREDIT))
return -1;
m_oYearEdit.SetLimitText(4);
rect.SetRect(79, 3, 98, 23);
if(!m_oYearSelect.Create(UDS_NOTHOUSANDS|WS_CHILD|WS_TABSTOP|
WS_VISIBLE|UDS_SETBUDDYINT|UDS_ALIGNRIGHT,
rect, this, IDC_YEARSELECT))
return -1;
m_oYearSelect.SetBuddy(&m_oYearEdit);
m_oYearSelect.SetRange(START_YEAR, END_YEAR);
m_oYearSelect.SetPos(m_oCalendar.GetYear());
//create select month combobox
rect.SetRect(LEFT_X, TOP_Y+HEIGHT+ 2, LEFT_X + WIDTH, TOP_Y+ 8*HEIGHT + 2);
if(!m_oMonthSelect.Create(WS_VSCROLL|CBS_DROPDOWNLIST|WS_CHILD|
WS_VISIBLE|WS_TABSTOP,
rect, this, IDC_MONTHSELECT))
return -1;
#undef LEFT_X
#undef TOP_Y
#undef WIDTH
#undef HEIGHT
//create today button
rect.SetRect(255, 184, 328, 206);
if(!m_obutToday.Create("今天", WS_CHILD|WS_VISIBLE|WS_TABSTOP, rect, this, IDC_BUTTODAY))
return -1;
char text[10];
for(int i=0; i<12; i++)
{
CCalendar::FormatMonth(i+1, text, FALSE);
m_oMonthSelect.AddString(text);
}
m_oMonthSelect.SetCurSel(m_oCalendar.GetMonth()-1);
return 0;
}
void CCalendarFrm::OnMonthChange()
{
WORD iYear, iDay, iMonth;
m_oCalendar.GetDate(iYear, iMonth, iDay);
iMonth = m_oMonthSelect.GetCurSel()+1;
if(iMonth != m_oCalendar.GetMonth())
{
if(iDay > CCalendar::MonthDays(iYear, iMonth))
iDay = CCalendar::MonthDays(iYear, iMonth);
m_oCalendar.SetDate(iYear, iMonth, iDay);
Invalidate();
}
}
void CCalendarFrm::OnYearChange()
{
CString text;
m_oYearEdit.GetWindowText(text);
if(text.GetLength()<4)
return;
WORD iYear, iMonth, iDay;
m_oCalendar.GetDate(iYear, iMonth, iDay);
iYear = m_oYearSelect.GetPos();
if(iYear != m_oCalendar.GetYear())
{
if(iDay > CCalendar::MonthDays(iYear, iMonth))
iDay = CCalendar::MonthDays(iYear, iMonth);
m_oCalendar.SetDate(iYear, iMonth, iDay);
text.Format("%4d", iYear);
m_oYearEdit.SetWindowText(text);
Invalidate();
}
}
void CCalendarFrm::OnTodayClick()
{
WORD iYear, iMonth, iDay;
SYSTEMTIME systime;
::GetSystemTime(&systime);
iYear = systime.wYear;
iMonth = systime.wMonth;
iDay = systime.wDay;
if(iYear != m_oCalendar.GetYear() || iMonth != m_oCalendar.GetMonth()
|| iDay != m_oCalendar.GetDay())
{
SetDate(iYear, iMonth, iDay);
m_oYearSelect.SetPos(iYear);
m_oMonthSelect.SetCurSel(iMonth -1);
Invalidate();
}
}
void CCalendarFrm::l_CreateDispFont()
{
static LOGFONT logFont;
memset(&logFont, 0 ,sizeof(logFont));
logFont.lfHeight = 16;
logFont.lfWeight = FW_NORMAL;
logFont.lfWidth = 0;
logFont.lfCharSet = GB2312_CHARSET;
logFont.lfOutPrecision = OUT_DEFAULT_PRECIS;
logFont.lfClipPrecision = CLIP_DEFAULT_PRECIS;
logFont.lfQuality = PROOF_QUALITY;
logFont.lfPitchAndFamily = VARIABLE_PITCH|FF_ROMAN;
strcpy(logFont.lfFaceName, "Disp Font");
m_oDispFont.CreateFontIndirect(&logFont);
SetFont(&m_oDispFont, FALSE);
}
/////////////////////////////////////////////////////////////////////////////
// CYearEdit
CYearEdit::CYearEdit()
{
}
CYearEdit::~CYearEdit()
{
}
BEGIN_MESSAGE_MAP(CYearEdit, CEdit)
//{{AFX_MSG_MAP(CYearEdit)
ON_WM_CHAR()
ON_WM_KILLFOCUS()
//}}AFX_MSG_MAP
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CYearEdit message handlers
BOOL CYearEdit::Create(const RECT& rect, CWnd* pParentWnd, UINT nID)
{
return CWnd::CreateEx(WS_EX_CLIENTEDGE, _T("EDIT"), NULL,
WS_CHILD|WS_VISIBLE, rect, pParentWnd, nID);
}
void CYearEdit::OnChar(UINT nChar, UINT nRepCnt, UINT nFlags)
{
if(nChar < '0' || nChar > '9')
return;
CEdit::OnChar(nChar, nRepCnt, nFlags);
}
void CYearEdit::OnKillFocus(CWnd* pNewWnd)
{
char syear[6];
GetWindowText(syear, 5);
long iyear = atol(syear);
if(iyear < START_YEAR)
{
sprintf(syear, "%4d", START_YEAR);
SetWindowText(syear);
}
else if(iyear > END_YEAR)
{
sprintf(syear, "%4d", END_YEAR);
SetWindowText(syear);
}
CEdit::OnKillFocus(pNewWnd);
}
const char *HolText[] ={"小寒", "大寒", "立春", "雨水",
"驚蟄", "春分", "清明", "谷雨",
"立夏", "小滿", "芒種", "夏至",
"小暑", "大暑", "立秋", "處暑",
"白露", "秋分", "寒露", "霜降",
"立冬", "小雪", "大雪", "冬至"};?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -