时钟完整版(带弧度).doc_第1页
时钟完整版(带弧度).doc_第2页
时钟完整版(带弧度).doc_第3页
时钟完整版(带弧度).doc_第4页
时钟完整版(带弧度).doc_第5页
已阅读5页,还剩6页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

#include #include #include resource.h#pragma comment(lib,WinLib.lib)#define ID_TIMER 1void SetDlgMenuID(UINT nMainDlgID,UINT nCalendarDlgID,UINT nMenuID);void SetButtonID(UINT nCalendarID,UINT nExitID);INT_PTR ShowMainDlg();/*API函数参考:GetLocalTime: 获得当前时间(公历:年、月、日、周)MoveToEx: 移动划线的起点LineTo: 绘制到某一点SetTextColor: 设置要绘制的文字颜色TextOut: 绘制文字GetLocalTime:获得当前系统的本地时间结构体类型参考:SYSTEMTIME: 描述时间类型,包括年月日、时分秒、周*/HINSTANCE g_hInst;/保存操作系统传递进来的应用程序实例句柄/Windows程序入口函数int WINAPI WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nShowCmd )g_hInst = hInstance;SetDlgMenuID(IDD_DLG_CLOCK,IDD_DLG_CALENDAR,IDR_MENU);SetButtonID(ID_CALENDAR,ID_EXIT);ShowMainDlg(IDD_DLG_CLOCK);typedef struct _stDateTimeint nYear;int nMonth;int nDay;stDateTime;/定义表格,存储年-2099年的农历信息:每年的大小月、闰月信息、春节所在的公历日期unsigned int LunarCalendarTable199 = 0x04AE53,0x0A5748,0x5526BD,0x0D2650,0x0D9544,0x46AAB9,0x056A4D,0x09AD42,0x24AEB6,0x04AE4A,/*1901-1910*/0x6A4DBE,0x0A4D52,0x0D2546,0x5D52BA,0x0B544E,0x0D6A43,0x296D37,0x095B4B,0x749BC1,0x049754,/*1911-1920*/0x0A4B48,0x5B25BC,0x06A550,0x06D445,0x4ADAB8,0x02B64D,0x095742,0x2497B7,0x04974A,0x664B3E,/*1921-1930*/0x0D4A51,0x0EA546,0x56D4BA,0x05AD4E,0x02B644,0x393738,0x092E4B,0x7C96BF,0x0C9553,0x0D4A48,/*1931-1940*/ 0x6DA53B,0x0B554F,0x056A45,0x4AADB9,0x025D4D,0x092D42,0x2C95B6,0x0A954A,0x7B4ABD,0x06CA51,/*1941-1950*/0x0B5546,0x555ABB,0x04DA4E,0x0A5B43,0x352BB8,0x052B4C,0x8A953F,0x0E9552,0x06AA48,0x6AD53C,/*1951-1960*/0x0AB54F,0x04B645,0x4A5739,0x0A574D,0x052642,0x3E9335,0x0D9549,0x75AABE,0x056A51,0x096D46,/*1961-1970*/0x54AEBB,0x04AD4F,0x0A4D43,0x4D26B7,0x0D254B,0x8D52BF,0x0B5452,0x0B6A47,0x696D3C,0x095B50,/*1971-1980*/0x049B45,0x4A4BB9,0x0A4B4D,0xAB25C2,0x06A554,0x06D449,0x6ADA3D,0x0AB651,0x093746,0x5497BB,/*1981-1990*/0x04974F,0x064B44,0x36A537,0x0EA54A,0x86B2BF,0x05AC53,0x0AB647,0x5936BC,0x092E50,0x0C9645,/*1991-2000*/0x4D4AB8,0x0D4A4C,0x0DA541,0x25AAB6,0x056A49,0x7AADBD,0x025D52,0x092D47,0x5C95BA,0x0A954E,/*2001-2010*/0x0B4A43,0x4B5537,0x0AD54A,0x955ABF,0x04BA53,0x0A5B48,0x652BBC,0x052B50,0x0A9345,0x474AB9,/*2011-2020*/0x06AA4C,0x0AD541,0x24DAB6,0x04B64A,0x69573D,0x0A4E51,0x0D2646,0x5E933A,0x0D534D,0x05AA43,/*2021-2030*/0x36B537,0x096D4B,0xB4AEBF,0x04AD53,0x0A4D48,0x6D25BC,0x0D254F,0x0D5244,0x5DAA38,0x0B5A4C,/*2031-2040*/0x056D41,0x24ADB6,0x049B4A,0x7A4BBE,0x0A4B51,0x0AA546,0x5B52BA,0x06D24E,0x0ADA42,0x355B37,/*2041-2050*/0x09374B,0x8497C1,0x049753,0x064B48,0x66A53C,0x0EA54F,0x06B244,0x4AB638,0x0AAE4C,0x092E42,/*2051-2060*/0x3C9735,0x0C9649,0x7D4ABD,0x0D4A51,0x0DA545,0x55AABA,0x056A4E,0x0A6D43,0x452EB7,0x052D4B,/*2061-2070*/0x8A95BF,0x0A9553,0x0B4A47,0x6B553B,0x0AD54F,0x055A45,0x4A5D38,0x0A5B4C,0x052B42,0x3A93B6,/*2071-2080*/0x069349,0x7729BD,0x06AA51,0x0AD546,0x54DABA,0x04B64E,0x0A5743,0x452738,0x0D264A,0x8E933E,/*2081-2090*/0x0D5252,0x0DAA47,0x66B53B,0x056D4F,0x04AE45,0x4A4EB9,0x0A4D4C,0x0D1541,0x2D92B5 /*2091-2099*/;char* TianGanDizhi60=甲子, 乙丑,丙寅,丁卯,戊辰,已巳,庚午,辛未,壬申,癸酉,甲戌,乙亥,丙子,丁丑,戊寅,已卯,庚辰,辛巳,壬午,癸未,甲申,乙酉,丙戌,丁亥,戊子,已丑,庚寅,辛卯,壬辰,癸巳,甲午,乙未,丙申,丁酉,戊戌,已亥,庚子,辛丑,壬寅,癸卯,甲辰,乙巳,丙午,丁未,戊申,已酉,庚戌,辛亥,壬子,癸丑,甲寅,乙卯,丙辰,丁巳,戊午,已未,庚申,辛酉,壬戌,癸亥;char *ChDayTable = *,初一,初二,初三,初四,初五,初六,初七,初八,初九,初十,十一,十二,十三,十四,十五,十六,十七,十八,十九,二十,廿一,廿二,廿三,廿四,廿五,廿六,廿七,廿八,廿九,三十;char *ChMonthTable = *,正,二,三,四,五,六,七,八,九,十,十一,腊;/定义表格,存储每月日离元旦的天数(不考虑瑞年)unsigned int MonthAdd12 = 0,31,59,90,120,151,181,212,243,273,304,334;/定义用户要显示的年、月、日unsigned int nCurrentYear=0;unsigned int nCurrentMonth=0;unsigned int nCurrentDay=0;/判断某年是否为公历瑞年int IsLeapYear(WORD iYear)if(iYear%4=0&iYear%100!=0 )|(iYear%100=0&iYear%400=0)return 1;else return 0;/公历日期转农历日期的函数void SunToLunar(const stDateTime* pSunDay,stDateTime* pLunarDay)int i=0;int SunDiff=0;int SpringDiff=0;int nSpringYear=pSunDay-nYear;int nSpringMonth=1;int nSpringDay=0;/计算当前公历日离当年元旦的天数SunDiff = MonthAddpSunDay-nMonth-1 + pSunDay-nDay - 1;if(IsLeapYear(pSunDay-nYear) & (pSunDay-nMonth 2) )/若是瑞年且大于月,天数再加SunDiff+;/计算春节所在公历日离元旦的天数:通过查表,计算当年的春节所在的公历日期,if(LunarCalendarTablepSunDay-nYear - 1901 & 0x60)5)=1)/若春节在公历月SpringDiff= (LunarCalendarTablepSunDay-nYear-1901&0x1F)-1;else/若春节在公历月SpringDiff= (LunarCalendarTablepSunDay-nYear-1901&0x1F)-1+31;/SunDiff和SpringDiff的差就是当前公历日离春节的天数if(SunDiffSpringDiff)/公历日在春节后int x = SunDiff - SpringDiff;int bLunar = (LunarCalendarTablenSpringYear - 1901 & 0xF00000)20;/闰月月份i=0;nSpringMonth=1;for(;)int a = (LunarCalendarTablepSunDay-nYear-1901 & (0x80000i);/计算大小月if(a=0)a=29;elsea=30;if(xbLunar & bLunar0)nSpringMonth-;else/公历日在春节前int x = SpringDiff-SunDiff;int nShift=0;int bLunar = (LunarCalendarTablenSpringYear - 1901 & 0xF00000)20;/闰月月份i=0;nSpringYear-;/需要上一年的农历信息nSpringMonth=12;/从最后一个月开始计算if (bLunar = 0)/如果没有润月nShift = 0x100;elsenShift = 0x80;for(;)int a = (LunarCalendarTablenSpringYear-1901 & (nShifti);/计算大小月if(a=0)a=29;elsea=30;if(xa)x = a-x;break;x =x - a;i+;nSpringMonth-;nSpringDay =x+1;if(nSpringMonth0)nSpringMonth+;pLunarDay-nYear = nSpringYear;pLunarDay-nMonth= nSpringMonth;pLunarDay-nDay = nSpringDay;/根据公历日期获得星期int GetDayOfWeek(const stDateTime* pSunDay)/根据泰勒公式/nWeek = nYear1 - 2*nYear1 + nYear2 + nYear2 + 26(nMonth+1) + nDay - 1int nWeek=0;int nYear1=pSunDay-nYear/100;/年的前两位数字int nYear2=pSunDay-nYear%100;/年的后两位数字int nDay=pSunDay-nDay; /公立日int nMonth=pSunDay-nMonth;/公立月数,所求的月份如果是月或月,/则应视为上一年的月或月,/也就是公式中nMonth的取值范围是从到而不是从到if(nMonth=1 | nMonth=2)nMonth=12+nMonth;nYear1=(pSunDay-nYear-1)/100;/年的前两位数字nYear2=(pSunDay-nYear-1)%100;/年的后两位数字nWeek = nYear1/4 - 2*nYear1 + nYear2 + nYear2/4 + (26*(nMonth+1)/10 + nDay - 1;nWeek = nWeek%7;return nWeek;/根据公立年得到农历干支年char* GetGanZhi(int nYear)return TianGanDizhi1970%60-3-1;/日历绘制函数,学员自己实现该函数void DrawCalendar(HDC hDC,int nWidth,int nHeight)stDateTime SunDay,LunarDay;const int xOrg=10;const int yOrg=10;const int xRight = nWidth - 50;const int yBottom = nHeight- 20;const char *sText=日,一,二,三,四,五,六;int i=0;int nVer=0;char str3;int T=0;int w=0;int H=0;int W=0;/绘制日历的矩形背景Rectangle(hDC,xOrg,yOrg,xRight,yBottom);/绘制星期标题框MoveToEx(hDC,xOrg,yOrg+25,NULL);LineTo(hDC,xRight,yOrg+25);/剩余总高度nVer = yBottom-yOrg-25;nVer = nVer/6;/绘制每日的高度线for(i=0;i5;i+)MoveToEx(hDC,xOrg,yOrg+25+nVer*(i+1),NULL);LineTo(hDC,xRight,yOrg+25+nVer*(i+1);/剩余总宽度nVer = xRight-xOrg;nVer = nVer/7;/绘制每日的宽度线for(i=0;i6;i+)MoveToEx(hDC,xOrg+nVer*(i+1),yOrg,NULL);LineTo(hDC,xOrg+nVer*(i+1),yBottom);/绘制星期标题框内的文字SetTextColor(hDC,RGB(255,0,0);TextOut(hDC,xOrg+20,yOrg+6,sText0,strlen(sText0);SetTextColor(hDC,RGB(0,0,0);for(i=1;i6;i+)TextOut(hDC,xOrg+20+nVer*i,yOrg+6,sTexti,strlen(sTexti);SetTextColor(hDC,RGB(255,0,0);TextOut(hDC,xOrg+20+nVer*6,yOrg+6,sText6,strlen(sText6);/以下代码是公历和农历计算并显示if(nCurrentYear=0)/如果当前日期还没有被设定SYSTEMTIME DateTime;GetLocalTime(&DateTime);nCurrentYear = DateTime.wYear;nCurrentMonth= DateTime.wMonth;nCurrentDay =DateTime.wDay;SunDay.nYear = nCurrentYear;SunDay.nMonth = nCurrentMonth;SunDay.nDay = 1;/根据公历日期获得农历日期SunToLunar(&SunDay,&LunarDay);/ GetDayOfWeek(&SunDay); if(SunDay.nMonth=1|3|5|7|8|10|12)T=31;elseif(SunDay.nMonth=4|6|9|11)T=30;elseif(SunDay.nMonth=2&IsLeapYear(SunDay.nYear)T=29;elseT=28;w=GetDayOfWeek(&SunDay);for(i=1;i=T;i+) SunDay.nDay=i; SunToLunar(&SunDay,&LunarDay);W=(w+i-1)%7; H=(w+i-1)-(w+i-1)%7)/7; if (i=10) itoa(i,str,10); TextOut(hDC,xOrg+10+(W)*69,yOrg+H*62+34,str,2); TextOut(hDC,xOrg+10+W*69,yOrg+H*62+34+16,ChDayTableLunarDay.nDay,4); /事件函数:点击日历界面上各个按钮后被调用,学员自己实现该函数/注意:该函数调用完后,系统自动调用DrawCalendar函数/ 因此,可以理解为,该函数和DrawCalendar函数是联动的void CalendarButtonEvent(UINT nID)switch (nID)case IDC_BTN_YEARUP:/点击了年按钮nCurrentYear+;break;case IDC_BTN_YEARDOWN:nCurrentYear-;break;case IDC_BTN_MONTHUP:nCurrentMonth+;break;case IDC_BTN_MONTHDOWN:nCurrentMonth-;break;case IDC_BTN_TODAY:nCurrentYear=0;break;/该函数每.5秒被调用一次,时钟界面上的文字绘制,学员自己实现该函数void DrawClockText(HDC hDC)HFONT hFont; RECT rc ; HBRUSH hBrush; const int xOrg=10; const int yOrg=10; wchar_t szBuffer100; wchar_t szBuffer2100; wchar_t szBuffer3100; wchar_t szBuffer4100; SYSTEMTIME tm; GetLocalTime(&tm); rc.left=37; rc.top=53; rc.right=88; rc.bottom=65; hBrush=CreateSolidBrush(RGB(1,78,104); FillRect(hDC,&rc,hBrush); SetBkMode(hDC,TRANSPARENT); SetTextColor(hDC,RGB(255,255,255); wsprintf(szBuffer,%2d:%2d:%2d,tm.

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论