C++获取和设置时区

一、     获取当前系统时区信息

使用API函数GetTimeZoneInformation可以获得当前时区的相关信息,函数原型为

DWORD GetTimeZoneInformation( 

LPTIME_ZONE_INFORMATION lpTimeZoneInformation );

需要传递一个TIME_ZONE_INFORMATION 结构体指针,此结构体定义为

typedef struct _TIME_ZONE_INFORMATION {

    LONG Bias;       //以分钟为单位

    WCHAR StandardName[ 32 ];// 标准时间的名称

    SYSTEMTIME StandardDate;

LONG StandardBias;

WCHAR DaylightName[ 32 ];// 夏令时的名称

    SYSTEMTIME DaylightDate;

    LONG DaylightBias;

} TIME_ZONE_INFORMATION, *PTIME_ZONE_INFORMATION, *LPTIME_ZONE_INFORMATION;

其中UTC = local time + bias(UTC时间 = 本地时间 + bias),具体含义参看MSDN

 

例子:

CString GetTimeZoneNow()
{    
     TIME_ZONE_INFORMATION   tzi;  

     GetSystemTime(&tzi.StandardDate);  

     GetTimeZoneInformation(&tzi);  

     CString   strStandName   =   tzi.StandardName;  

     CString   strDaylightName   =   tzi.DaylightName;  

     int zone = tzi.Bias/ -60; //时区,如果是中国标准时间则得到8 

     return strStandName;
}

 

二、     设置时区

可以使用API函数SetTimeZoneInformation设置时区,函数原型为

BOOL SetTimeZoneInformation(

 const TIME_ZONE_INFORMATION* lpTimeZoneInformation

);

同样需要TIME_ZONE_INFORMATION结构体,不过这是设置时区,所以我们要为这个结构体设置相应的值,我们可以在注册表

HKEY_LOCAL_MACHINE"SOFTWARE"Microsoft"Windows NT"CurrentVersion"Time Zones

下得到所有的时区信息,(如果不想每次都查注册表获得时区列表,可以讲时区列表保存至XML或其他文件中)
      以中国北京时间为例即 China Standard Time子项,



     Display 在控制面板中调整时区时显示的名称 

Std:标准时间名称 

Dlt 如果有夏令时时区则为其名称。 

Tzi 一个数据结构,包含本地时区和0时区相差的分钟数等信息。二进制形式存储的  

用一结构体定义之

typedef struct _REG_TZI_FORMAT

{

    LONG Bias;

    LONG StandardBias;

    LONG DaylightBias;

    SYSTEMTIME StandardDate;

    SYSTEMTIME DaylightDate;

} REG_TZI_FORMAT;

   

 例子:(上面的结构体定义不要忘记加入代码)

代码参看至http://www.diybl.com/course/3_program/c++/cppjs/20090302/156436.html#

 

BOOL CSetTimeZone(CString subKey)
{
     //获得权限

     HANDLE hToken;

     TOKEN_PRIVILEGES tkp; 

     OpenProcessToken(GetCurrentProcess(),TOKEN_ADJUST_PRIVILEGES|TOKEN_QUERY, &hToken);

     LookupPrivilegeValue(NULL, TEXT("SeTimeZonePrivilege"), &tkp.Privileges[0].Luid);

     tkp.PrivilegeCount = 1;

     tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;

     AdjustTokenPrivileges(hToken, FALSE, &tkp, 0, (PTOKEN_PRIVILEGES)NULL, 0);
 

     HKEY hKey;

     TIME_ZONE_INFORMATION tziNew;

     REG_TZI_FORMAT regTZI;

     DWORD dwBufLen=sizeof(regTZI);

     LONG lRet;

 

     CString keyName = _T("Software""Microsoft""Windows NT""CurrentVersion""Time Zones""") + subKey;

     CString strStd = _T("");//标准时间名称

     CString strDlt = _T("");//夏令时名称

 

     unsigned char szData[256];

     DWORD dwDataType, dwBufSize;

     dwBufSize = 256;

 

     lRet = RegOpenKeyEx(HKEY_LOCAL_MACHINE,keyName,    0, KEY_QUERY_VALUE, &hKey ); 

     if( lRet != ERROR_SUCCESS )

         return FALSE;
 

     lRet = RegQueryValueEx( hKey, TEXT("TZI"), NULL, NULL,(LPBYTE)&regTZI, &dwBufLen);

     if(RegQueryValueEx(hKey, _T("Dlt"), 0, &dwDataType, szData, &dwBufSize) == ERROR_SUCCESS)

         strDlt = (LPCTSTR)szData;

 

     dwBufSize = 256;

     if(RegQueryValueEx(hKey, _T("Std"), 0, &dwDataType, szData, &dwBufSize) == ERROR_SUCCESS)

         strStd = (LPCTSTR)szData;

 

     RegCloseKey(hKey);

 

     if( (lRet != ERROR_SUCCESS) || (dwBufLen > sizeof(regTZI)) )

         return FALSE;

 //设置值

     ZeroMemory(&tziNew, sizeof(tziNew));

     tziNew.Bias = regTZI.Bias;

     tziNew.StandardDate = regTZI.StandardDate;

     wcscpy(tziNew.StandardName, strStd);

     wcscpy(tziNew.DaylightName, strDlt);

     tziNew.DaylightDate = regTZI.DaylightDate;

     tziNew.DaylightBias = regTZI.DaylightBias;

 

     if( !SetTimeZoneInformation( &tziNew ) )

     {

         TRACE("Failure1: %d"n", GetLastError());

         return FALSE;

     }

 

     tkp.Privileges[0].Attributes = 0;

     AdjustTokenPrivileges(hToken, FALSE, &tkp, 0, (PTOKEN_PRIVILEGES) NULL, 0);

 

     return TRUE;

}

 

调用说明:如果要设置成(GMT+05:00) 叶卡捷琳堡

则为 CSetTimeZone(_T(“Ekaterinburg Standard Time”));

转载于:https://www.cnblogs.com/anhuizhxd/archive/2009/09/21/setshiqu.html

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
unit uTimeZonesMgr; interface uses Windows, SysUtils, Classes, Registry, DateUtils; type {* 用于读取时区注册表TZI(长度为44)的属性值,存储时区信息 *} PRegTZIInfo = ^TRegTZIInfo; TRegTZIInfo = record Bias: Longint; StandardBias: Longint; DaylightBias: Longint; StandardDate: TSystemTime; DaylightDate: TSystemTime; end; {* 单个时区管理对象 *} TTimeZone = class private FTimeZoneName: string; //时区的显示名 FDisplay: string; //夏令时的名字 FDlt: string; //时区标准名字 FStd: string; //是Time zone information的缩写,描述时区的一些重要信息 FTZI: PRegTZIInfo; function GetSelfTimeZoneInformation: TTimeZoneInformation; public constructor Create; destructor Destroy; override; function UTCToLocalDateTime(const AUTC: TDateTime; var ALocalDateTime: TDateTime): Boolean; function LocalDateTimeToUTC(const ALocalDateTime: TDateTime; var AUTC: TDateTime): Boolean; public property TimeZoneName: string read FTimeZoneName write FTimeZoneName; property Display: string read FDisplay write FDisplay; property Dlt: string read FDlt write FDlt; property Std: string read FStd write FStd; property TZI: PRegTZIInfo read FTZI write FTZI; end; {* 所有时区管理对象 *} TTimeZones = class private FTimeZoneKeyPath: string; FTimeZoneList: TStringList; FDefaultTimeZone: TTimeZone; procedure CollectTimeZone; procedure DestoryTimeZones; procedure CheckISDefaultTimeZone(ATimeZone: TTimeZone); public constructor Create; destructor Destroy; override; function FindTimeZone(const ADisplay: string): TTimeZone; public property TimeZoneList: TStringList read FTimeZoneList; property DefaultTimeZone: TTimeZone read FDefaultTimeZone; end; implementation { TTimeZones } procedure TTimeZones.CheckISDefaultTimeZone(ATimeZone: TTimeZone); var DefaultTimeZone: TTimeZoneInformation; begin GetTimeZoneInformation(DefaultTimeZone); if (ATimeZone.TZI.Bias = DefaultTimeZone.Bias) and (ATimeZone.Std = DefaultTimeZone.StandardName) then FDefaultTimeZone := ATimeZone; end; procedure TTimeZones.CollectTimeZone; var reg, tempReg: TRegistry; tempKeyPath: string; tempTimeZoneStrings: TStrings; iCir: Integer; tempTimeZone: TTimeZone; begin reg := TRegistry.Create; try reg.RootKey := HKEY_LOCAL_MACHINE; reg.OpenKey(FTimeZoneKeyPath, False); tempTimeZoneStrings := TStringList.Create; try reg.GetKeyNames(tempTimeZoneStrings); for iCir := 0 to tempTimeZoneStrings.Count - 1 do begin tempKeyPath := FTimeZoneKeyPath + '\' + tempTimeZoneStrings.Strings[iCir]; tempReg := TRegistry.Create; try tempReg.RootKey := HKEY_LOCAL_MACHINE; tempReg.OpenKey(tempKeyPath, False); tempTimeZone := TTimeZone.Create; tempTimeZone.TimeZoneName := tempTimeZoneStrings.Strings[iCir]; tempTimeZone.Display := tempReg.ReadString('Display'); tempTimeZone.Std := tempReg.ReadString('Std'); tempTimeZone.Dlt := tempReg.ReadString('Dlt'); tempReg.ReadBinaryData('TZI', tempTimeZone.TZI^, SizeOf(TRegTZIInfo)); FTimeZoneList.AddObject(tempTimeZone.Display, tempTimeZone); if FDefaultTimeZone = nil then CheckISDefaultTimeZone(tempTimeZone); finally tempReg.CloseKey; tempReg.Free; end; end; finally tempTimeZoneStrings.Free; end; finally reg.CloseKey; reg.Free; end; end; constructor TTimeZones.Create; begin FTimeZoneKeyPath := '\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Time Zones'; FTimeZoneList := TStringList.Create; FTimeZoneList.Sorted := True; FDefaultTimeZone := nil; CollectTimeZone; end; procedure TTimeZones.DestoryTimeZones; var iCir: Integer; tempTimeZone: TTimeZone; begin for iCir := 0 to FTimeZoneList.Count - 1 do begin tempTimeZone := TTimeZone(FTimeZoneList.Objects[iCir]); tempTimeZone.Free; end; FTimeZoneList.Clear; FTimeZoneList.Free; end; destructor TTimeZones.Destroy; begin DestoryTimeZones(); inherited; end; function TTimeZones.FindTimeZone(const ADisplay: string): TTimeZone; var iIndex: Integer; begin Result := nil; FTimeZoneList.Sort; if FTimeZoneList.Find(ADisplay, iIndex) then begin Result := TTimeZone(FTimeZoneList.Objects[iIndex]); end; end; { TTimeZone } constructor TTimeZone.Create; begin FTZI := GetMemory(SizeOf(TRegTZIInfo)); FillMemory(FTZI, SizeOf(TRegTZIInfo), 0); end; destructor TTimeZone.Destroy; begin FreeMemory(FTZI); inherited; end; function TTimeZone.GetSelfTimeZoneInformation: TTimeZoneInformation; begin GetTimeZoneInformation(Result); Result.Bias := TZI^.Bias; Result.StandardBias := TZI^.StandardBias; Result.StandardDate := TZI^.StandardDate; Result.DaylightBias := TZI^.DaylightBias; Result.DaylightDate := TZI^.DaylightDate; end; function TTimeZone.LocalDateTimeToUTC(const ALocalDateTime: TDateTime; var AUTC: TDateTime): Boolean; var tempLocalToLocal: TDateTime; iMilliSecond: Int64; begin Result := UTCToLocalDateTime(ALocalDateTime, tempLocalToLocal); if Result then begin if tempLocalToLocal > ALocalDateTime then begin iMilliSecond := MilliSecondsBetween(tempLocalToLocal, ALocalDateTime); AUTC := IncMilliSecond(ALocalDateTime, iMilliSecond * -1); end else begin iMilliSecond := MilliSecondsBetween(ALocalDateTime, tempLocalToLocal); AUTC := IncMilliSecond(ALocalDateTime, iMilliSecond); end; Result := True; end; end; function TTimeZone.UTCToLocalDateTime(const AUTC: TDateTime; var ALocalDateTime: TDateTime): Boolean; var TimeZone: TTimeZoneInformation; stUTC, stLC: SYSTEMTIME; begin Result := False; TimeZone := GetSelfTimeZoneInformation; DateTimeToSystemTime(AUTC, stUTC); if SystemTimeToTzSpecificLocalTime(@TimeZone, stUTC, stLC) then begin ALocalDateTime := SystemTimeToDateTime(stLC); Result := True; end; end; end.

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值