M myserver Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-06 #1 我想每月的月底即30号或31号那天的晚上12点做更新数据的动作 请问我如何去判断这一天是每月底30号或31的晚上12点呢。。
W WebBar Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-06 #2 "2001/10/01" toDate -1 toString = "2001/09/31"; ^_^
C cooler Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-06 #4 转换为日期后是数字型，可以加减，小数点后面是时间，小数点前面是日期， 从1899/12/30开始算起，依次类推吧，这样计算方便些．
D dlnew Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-06 #5 晚上12点在计算机中是个非法的datetime，其实是第二天的0时0分0秒.... 即然如此，那么就只要判断月份的数字是否改变，如果改变，就是月底。
H hongbo781202 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-06 #6 if the month is changeing
Z zhhc Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-06 #8 var st1,st2:TSystemTime; begin DateTimeToSystemTime(Now(),st1); DateTimeToSystemTime(Now()+1,st2); if (st2.wMonth<>st1.wMonth) then ShowMessage('是月底') else ShowMessage('不是月底'); end;
var st1,st2:TSystemTime; begin DateTimeToSystemTime(Now(),st1); DateTimeToSystemTime(Now()+1,st2); if (st2.wMonth<>st1.wMonth) then ShowMessage('是月底') else ShowMessage('不是月底'); end;
