G gadfly Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-05 #1 各位大侠,请问根据输入我得到了一个日期,我怎么知道这个日期对应的是星期几哪?
小 小唐 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-05 #2 用DayOfWeek()函数: 它返回从1到7的数字,1表示星期日,2表示星期一,7表示星期六。 这样用: if dayOfWeek(date)=1 then //date表示一个日期,如02-05-05 showMessage('今天是星期日');
用DayOfWeek()函数: 它返回从1到7的数字,1表示星期日,2表示星期一,7表示星期六。 这样用: if dayOfWeek(date)=1 then //date表示一个日期,如02-05-05 showMessage('今天是星期日');
P PFans Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-05 #6 var day1,day2:TDatetime; dd:integer; begin day1:=StrToDate('01-11-1');; day2:=date; dd:=trunc(day2)-trunc(day1); end;
var day1,day2:TDatetime; dd:integer; begin day1:=StrToDate('01-11-1');; day2:=date; dd:=trunc(day2)-trunc(day1); end;