如果程序里有需要处理日期的相关代码，养成
初始化日期时间格式的习惯。

代码加在程序的入口  Form.OnCreate事件里
  // delphi 10.3日期格式化

复制代码
// delphi 10.3
System.SysUtils.FormatSettings.DateSeparator := '-';
System.SysUtils.FormatSettings.TimeSeparator := ':';
System.SysUtils.FormatSettings.ShortDateFormat := 'yyyy-MM-dd';
System.SysUtils.FormatSettings.LongDateFormat := 'yyyy-MM-dd';
System.SysUtils.FormatSettings.TimeAMString := '';
System.SysUtils.FormatSettings.TimePMString := '';
System.SysUtils.FormatSettings.ShortTimeFormat := 'hh:nn:ss';
System.SysUtils.FormatSettings.LongTimeFormat := 'hh:nn:ss:zzz';
System.SysUtils.FormatSettings.DateSeparator := '-';
复制代码

 

//delphi 7
  Application.UpdateFormatSettings := False;
  LongDateFormat  := 'yyyy-MM-dd';
  ShortDateFormat := 'yyyy-MM-dd';
  LongTimeFormat  := 'HH:nn:ss';
  LongTimeFormat  := 'HH:nn:ss';
  DateSeparator   :='-';
  TimeSeparator   :=':';

 

总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字少！总说我字