828
社区成员
发帖
与我相关
我的任务
分享如何把date类型数据分“年”、“月”、“日”在报表中打印出来？谢谢帮忙！
如何把date类型数据分“年”、“月”、“日”在报表中打印出来？例如：我如何把2002-2-2分别打印出2002、2、2。谢谢帮忙！
...全文
请发表友善的回复…
发表回复
jtnetcom 2002-03-02
- 打赏
- 举报
使用函数将tdate转化为字符串：datetostr,可能还要用formatdatetime设定格式
jtnetcom
jtnetcom
抱朴守拙 2002-03-02
- 打赏
- 举报
FormatDateTime('yyyy" "mm" "dd',now);
linzhai 2002-03-02
- 打赏
- 举报
试试这句:
S := FormatDateTime('"The meeting is on " dddd, mmmm d, yyyy, " at " hh:mm AM/PM', Now + 0.125);
dddd: 天
mmmm: 月
yyyy: 年
S := FormatDateTime('"The meeting is on " dddd, mmmm d, yyyy, " at " hh:mm AM/PM', Now + 0.125);
dddd: 天
mmmm: 月
yyyy: 年
wfmwg 2002-03-02
- 打赏
- 举报
var
Present: TDateTime;
Year, Month, Day: Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
end;
Present: TDateTime;
Year, Month, Day: Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
end;
