导航

delphi中的strTodate()

Posted on 2020-10-03 10:19  displaynick  阅读(919)  评论(0)  编辑  收藏  举报

delphi中StrToDate和当前操作系统设定的日期格式有关，格式不一致时，会抛出错误。
最好在调用时，强制转换，如下 

var
t:TDateTime;
fs:TFormatSettings;
begin
fs.ShortDateFormat:='yyyy-mm-dd';
fs.DateSeparator:='-';
t := StrToDate('2010-01-01',fs);