DELPHI7对日期格式的处理
2021-05-16 02:30
标签：程序 datetime locale rgb 异常 格式 short windows系统 fse WINDOWS系统默认的短日期格式是：yyyy/m/d，在DELPHI中进行字符串互转时，经常会因为格式问题而转换失败，以前都是要求施工人员或客户手动修改系统的短日期格式为：yyyy-mm-dd来解决，近来无事找了一下相关资料，可以解决该问题 在应用程序打开时，可以通过TFormatSettings来设置应用程序的默认日期和时间格式 通过FSetting来对日期时间格式的字符串进行TDateTime转换就不会再出现异常了。 DELPHI7对日期格式的处理 标签：程序 datetime locale rgb 异常 格式 short windows系统 fse 原文地址：https://www.cnblogs.com/jijm123/p/14615924.htmluses
SysUtils, Windows；
GetLocaleFormatSettings(GetUserDefaultLCID,FSetting);
FSetting.DateSeparator := ‘-‘;
FSetting.ShortDateFormat := ‘yyyy-mm-dd‘;
FSetting.ShortTimeFormat := ‘00:00‘;
FSetting.LongDateFormat := ‘yyyy-mm-dd‘;
FSetting.LongTimeFormat := ‘00:00:00‘;
//日期时间字符串转换为TDateTime
sTime := FormatDateTime(‘yyyy-mm-dd hh:mm:ss‘,Now);
ADOQ.Fields[0].AsDateTime := StrToDateTime(sTime,FSetting);