各位大侠,请问根据输入我得到了一个日期,我怎么知道这个日期对应的是星期几哪?(50分)

  • 主题发起人 主题发起人 gadfly
  • 开始时间 开始时间
G

gadfly

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大侠,请问根据输入我得到了一个日期,我怎么知道这个日期对应的是星期几哪?
 
用DayOfWeek()函数:
它返回从1到7的数字,1表示星期日,2表示星期一,7表示星期六。
这样用:
if dayOfWeek(date)=1 then //date表示一个日期,如02-05-05
showMessage('今天是星期日');
 
日历控件有的是,借用一下即可
 
在请教,如何把两个日期相减而到两者的相差呢?
 
知道了!
 
var
day1,day2:TDatetime;
dd:integer;
begin
day1:=StrToDate('01-11-1');;
day2:=date;
dd:=trunc(day2)-trunc(day1);
end;
 
后退
顶部