本文整理自网络,侵删。
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;
相关阅读 >>
Delphi 判断是否为空('none', 'null', '')
Delphi 如何使用sendmessage发送后台组合键消息(ctrl+xxx)
Delphi中webbrowser(或者embeddedwebbrowser)控件打开部分网站报“invalid floating point operation”异常的解决方法
Delphi getrandompassword 生成随机密码
更多相关阅读请进入《Delphi》频道 >>