{n(6 2 999) m(36 2 999) kg(0 0 1)} WW:=FLOOR((DATETOD1970(date)-3)/7); WSt:=barpos=1 or WWref(ww,1); mm:=month; mst:=barpos=1 or mmref(mm,1); if kg=1 then begin WW:=mod(barpos,n)=1; WSt:=barpos=1 or WW; MM:=mod(barpos,m)=1; MSt:=barpos=1 or ...
作者:进2011 |发布:2012-06-30 11:53:01