巧算星期几

----本程序为老妖根据一个帖子写的。

void __fastcall TForm1::Button1Click(TObject *Sender)
{
char *WeekName[7]={"星期日","星期一","星期二","星期三","星期四","星期五","星期六"};
SYSTEMTIME Now,Tmp;
GetSystemTime(&Now);
Tmp.wYear=2222;　//要查询的年份
Tmp.wMonth=12;　　//要查询的月份
Tmp.wDay=31;　　 //要查询的日期
Tmp.wHour=1;　　//要查询的小时
Tmp.wMinute=1;　 //要查询的分数
Tmp.wSecond=1;　 //要查询的秒数
Tmp.wMilliseconds=1;　//要查询的微秒
if(SetSystemTime(&Tmp)!=0)
　 {
　 GetSystemTime(&Tmp);
　 ShowMessage(WeekName[Tmp.wDayOfWeek]);
　 }
else
　 {
　 ShowMessage(GetLastError());//如果错误值是87的话,是参数设置有错。
　 }
SetSystemTime(&Now);
}