Question

Delphi中如何将日期和时间转换为字符串型？

Delphi中如何将日期和时间转换为字符串型（Alpha型）？
例如将2008-3-22转换为“20080322”？
另外，将08：00转换为“0800”？

Thanks!

Answer 1

日期转换成字符串 有个函数可以帮你解决: FormatDateTime():string,他有两个参数,第一个是时间(TDateTime型),第二个是你要转换的格式(例如'yyyyMMdd hh:mm:ss')
举例:拿系统的Now这个时间来说
S := FormatDateTime(Now, 'hh:mm:ss'); 就可以将TDateTime型转换成string型了,但是有个条件,第一个参数必须是'yyyy/MM/dd'这样的格式,如果没有'/'会发生错误.
2008-3-22转换为"20080322"可以用StringReplace('2008-3-22', '-', '', [rfReplaceAll]);和AnsiReplaceStr('2008-3-22', '-', '');//这个需要引用strUtils单元.

Answer 2

delphi中可以使用FormatDateTime将时间格式成你想要的字符串(string类型)格式.
比如得到你想要的字符格式:
var
DateStr : string;
begin
DateStr := FormatDateTime(Date,'yyyymmdd hhss');
end;
其中的Date就是你的日期或者时间.

Answer 3

StringReplace('2008-3-22', '-', '', [rfReplaceAll]);
StringReplace('08:00', ':', '', [rfReplaceAll]);
datetimetostr(now) 转换字符串

Answer 4

DateToStr（time）

Answer 5

ugit