Delphi时间格式错误

Delphi 时间格式转化的时候,和系统时间不一样,就会造成转换的时候报错

StrToDate(‘2011-11-11’);

上面的这个转换,如果系统的时间格式是 2011-11-11 ,那就可以正常转换。

但是如果系统的时间格式是 2011/11/11 ,那就会报错,因此需要使用TFormatSettings

代码代码如下:

var
Fmt: TFormatSettings;
begin
Fmt.DateSeparator := '/';
    Fmt.ShortDateFormat := 'yyyy/mm/dd';
    Fmt.TimeSeparator := ':';
    Fmt.LongTimeFormat := 'hh:nn:ss';
    TmpDateTime := StrToDate('2000/01/01', Fmt);
	end;

发表评论