时间参数问题，有点急，在线等！

Question

用到两个时间参数
k_tbrq1,k_tbrq2
k_tbrq1:=formatdatetime('yyyy-mm-dd',datetimepicker1.date);
k_tbrq1为本日时间
k_tbrq2为月初时间
例如k_tbrq1为2003-07-15
    k_tbrq2则为2003-07-01
请哪位高手帮忙写一段代码，给定k_tbrq2的时间，谢谢！

Answer 1

Decodedate(datetimepicker1.date,y1,m1,d1)
K_tbrq2:=formatdatetime('yyyy-mm-dd',datetimepicker1.date-d1+1);

Answer 2

decodedate(k_tbrq1,year,month,day);
k_tbrq2encodedate(year,month,1);

Answer 3

先用decodedate解出年，月，日，在把日设置为01，再组合，就成了。