FormatDateTime函数如何定义上月26号至今月25号？

Question

Start_Time.Text :=FormatDateTime('yyyy-mm-dd',now);
  End_Time.Text :=FormatDateTime('yyyy-mm-25',now);这个函数如何定义开始时间是上月26号结束时间是今月25号？

Answer 1

Start_Time.Text :=FormatDateTime('yyyy-mm-dd',now);
  End_Time.Text :=FormatDateTime('yyyy-mm-dd',now-30);
如果你是按30天计算的话，直接在当前日期上如此（NOW（）-30）操作就行了。

Answer 2

Start_Time.Text :=FormatDateTime('yyyy-mm-dd',now);
End_Time.Text :=FormatDateTime('yyyy-mm-dd',incday(incmonth(now, -1)));