巧算星期几

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

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);

}