variable:n=0;
if monthe<>ref(month,1) then n:=1;
if weekday=5 then n:=n+1;
要在日线上用
variable:n=0;
if month<>ref(month,1) then n:=1;
if weekday=5 and day<>ref(day,1) then n:=n+1;
n=3的时候就是第三个礼拜五
variable:n=0;
if month<>ref(month,1) then n:=0;
if weekday=5 and day<>ref(day,1) then n:=n+1;
修改了一下,这个更合理