随笔 - 43, 文章 - 0, 评论 - 3, 阅读 - 34659

导航

< 2025年2月 >
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 1
2 3 4 5 6 7 8

delphi中的strTodate()

Posted on   displaynick  阅读(1031)  评论(0编辑  收藏  举报

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

var
t:TDateTime;
fs:TFormatSettings;
begin
fs.ShortDateFormat:='yyyy-mm-dd';
fs.DateSeparator:='-';
t := StrToDate('2010-01-01',fs);
点击右上角即可分享
微信分享提示