主页 > 编程资料 > Delphi >
发布时间:2015-09-22 作者:网络 阅读:74次

 strtodatetime 这个函数在win7下出错

例如 strtodatetime('2010-11-25') 在win7下出错 , 但在xp系统下正常
解决方法
日期格式不一样,你需要统一日期格式,可以再控制面板中修改,或者用代码实现
Delphi(Pascal) code


var
settings: TFormatSettings;
dt: TDateTime;
begin

GetLocaleFormatSettings(GetUserDefaultLCID, settings);
settings.DateSeparator := '-';
settings.TimeSeparator := ':';
settings.ShortDateFormat := 'yyyy-mm-dd';
settings.ShortTimeFormat := 'hh:nn:ss';

dt:= strToDateTime('2010-3-19 08:09:10',settings);

end;


关键字词: