Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.26;
Скачать: CL | DM;

Вниз

Проблема с SetSystemTime   Найти похожие ветки 

 
Leran2002 ©   (2003-05-05 17:19) [0]

Мастера что за глюки:

TmpDT:=Now; // для проверки сделал так
DateTimeToSystemTime(TmpDT,T);
SetSystemTime(T);

Все данные в системном времени выставляются нормально, кроме часов :((... Заметил что значение ЧАСА выставляется на 4 часа больше (если было 16, то становится 20)...

А при выводе, например:
ShowMessage(Format("%d/%d/%d %d:%d:%d:%d",[T.wYear,T.wMonth,T.wDay,T.wHour,T.wMinute,T.wSecond,T.wMilliseconds])); - все данные верны...

В чем проблема???


 
Zz_   (2003-05-05 17:22) [1]

SystemTimeToTzSpecificLocalTime


 
Leran2002 ©   (2003-05-05 17:47) [2]


> Zz_ (05.05.03 17:22)

Большое спасибо за скорый ответ...

Вот так работает на ура:

var
T1,T2:_SYSTEMTIME;
TmpDT:TDateTime;
TZ:TTimeZoneInformation;
...

TmpDT:=Now;

DateTimeToSystemTime(TmpDT,T1);
GetTimeZoneInformation(TZ);
SystemTimeToTzSpecificLocalTime(@TZ,T1,T2);
SetSystemTime(T2);



Страницы: 1 вся ветка

Текущий архив: 2003.05.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
1-83530
Fotog
2003-05-13 11:40
2003.05.26
CreateOleObject


3-83413
Salvator
2003-05-05 09:20
2003.05.26
Нужна мат. модель БД


1-83449
Борис1
2003-05-13 13:05
2003.05.26
Работа с Word в Delphi7


3-83368
TankMan
2003-05-03 00:07
2003.05.26
Помогите с полем ID


4-83790
QUE
2003-03-26 11:57
2003.05.26
VK_A до VK_Z A до Z ($41 - $5A) а еще ?