[Delphi (Object Pascal)] Delphi检查当地时间是否是夏令时 →→→→→进入此内容的聊天室

来自 , 2019-10-15, 写在 Delphi (Object Pascal), 查看 150 次.
URL http://www.code666.cn/view/8ca070cc
  1. function IsDaylightSaving: Boolean;
  2. var
  3.   Dummy: Windows.TTimeZoneInformation; // info about time zone
  4. begin
  5.   Result := False;
  6.   case Windows.GetTimeZoneInformation(Dummy) of
  7.     Windows.TIME_ZONE_ID_INVALID: SysUtils.RaiseLastOSError;
  8.     Windows.TIME_ZONE_ID_DAYLIGHT: Result := True;
  9.   end;
  10. end;
  11. //delphi/2173

回复 "Delphi检查当地时间是否是夏令时"

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

captcha