根据日期能判断出是第几周 delphi 的monthcalendar控件的哪个属性(50分)

wjiachun · 2001-04-15

判断第几周可以用（当前日期－当年1月1日＋1） div 7

wjiachun · 2001-04-15

忘了，然后还要加1

tianwater · 2001-04-15

可是日期相减后的结果是双精度的值,而我们要取整,再进行整除。

汉鸭子 · 2001-06-02

从1月1日循环到DATE,循环次数/7

leebons · 2001-06-02

give you a example
var
; weekCount : Integer;
begin
; weekCount := Trunc(DateTime1 - DateTime2) div 7+1;
end;

zyy04 · 2001-10-16

多人接受答案了。