[Delphi (Object Pascal)] Dephi判断当前系统是否使用的24小时格式时间 →→→→→进入此内容的聊天室

来自 , 2019-08-09, 写在 Delphi (Object Pascal), 查看 106 次.
URL http://www.code666.cn/view/d240cb4a
  1. function Is24HourTimeFormat: Boolean;
  2. var
  3.   DefaultLCID: Windows.LCID;  // thread's default locale
  4. begin
  5.   DefaultLCID := Windows.GetThreadLocale;
  6.   Result := 0 <> SysUtils.StrToIntDef(
  7.     SysUtils.GetLocaleStr(DefaultLCID, Windows.LOCALE_ITIME, '0'),
  8.     0
  9.   );
  10. end;
  11. //delphi/2172

回复 "Dephi判断当前系统是否使用的24小时格式时间"

这儿你可以回复上面这条便签

captcha