如何将当前日期变成指定的格式? yy/mm/dd如:03/11/09 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 formatdatetime('yy/MM/dd hh:mm:ss',now) procedure TForm1.Button1Click(Sender: TObject);var Present: TDateTime; Year, Month, Day : Word;begin Present:= Now; DecodeDate(Present, Year, Month, Day); Label1.Caption := Format('%2d/%2d/%2d',[Year, Month, Day]);end;; 我认为第一楼 aybc(aybc) 的比较好formatdatetime('yy/mm/dd',now) 要用特殊的格式,就用hch_45(んこん) ( ) 信誉:121 的方法,一般情况就用formatdatetime('yyyy''年''mm''月''dd''日',datetime); stringgrid表单录入,用回车判断并实现焦点转移,急!! 写好了一个软件,想请大家帮忙给软件起个名字! 求一个简单数据操作,但一直没搞定,请高手进.... 我很在意BORLAND,金色的BORLAND,详见下文 高手帮帮我!!! 数据不够如何用空表格代替,占满一页 delphi中< 怎样改变菜单得字体大小>? 关于控件的兼容性问题,进来看看…… 数据是存文件好,还是存数据库好!! 如何隐藏本程序的进程? 有没有RxRichEdit的替代控件,要求可以显示图片?我对RxRichEdit对中文的支持情况失望极了 关于exe文件
var
Present: TDateTime;
Year, Month, Day : Word;
begin
Present:= Now;
DecodeDate(Present, Year, Month, Day);
Label1.Caption := Format('%2d/%2d/%2d',[Year, Month, Day]);
end;;
formatdatetime('yy/mm/dd',now)