Вниз
Скачать: CL | DM;

Ошибка UnixToDateTime   Найти похожие ветки 

← →
wsv ©   (2007-07-27 10:53) [0]

Здравствуйте, все. Delphi, Мускул.

Получаю штамп в Unix - формате, например: 1184599590.
Перевожу:
showmessage(datetimetostr(unixtodatetime(1184599590)));
получаю ответ: 16.07.2007 15:26:30.

Казалось бы все нормально, но делаю запрос того же самого значения к Мускулу: Select from_unixtime(....) from ... и получаю ответ: 16.07.2007 21:26:30!!!
Разница в 5 часов. Гиде ошибка?


← →
wsv ©   (2007-07-27 10:59) [1]

Забыл отметить, что в SysUtils-е стоит
UnixDateDelta = 25569


← →
sniknik ©   (2007-07-27 11:01) [2]

а разницу по гринвичу функция учитывает? в смысле она в локальное время преобразовывает? и где сервер MySql находится, и где дельфи?


← →
wsv ©   (2007-07-27 11:04) [3]


> а разницу по гринвичу функция учитывает? в смысле она в
> локальное время преобразовывает? и где сервер MySql находится,
>  и где дельфи?
>


База Мускула локальна. На компе. Дельфи здесь же.
Куда смотреть?


← →
wsv ©   (2007-07-27 11:12) [4]

Всем сорри.
В базу валятся значения по гринвичу. Разница местная - +5 к гринвичу.
Как заставить showmessage(datetimetostr(unixtodatetime(1184599590))) вывести гринвич?


← →
sniknik ©   (2007-07-27 11:13) [5]

... ну это было только предположение.

> Куда смотреть?
наверное в хелп по мускульной from_unixtime, и дельфевой unixtodatetime, сравнить на предмет "а одинаково ли они работают".


← →
sniknik ©   (2007-07-27 11:15) [6]

> Как заставить showmessage(datetimetostr(unixtodatetime(1184599590))) вывести гринвич?
GetTimeZoneInformation
предоставляет инфу по настройкам локального времени, прочитать и добавить...


← →
wsv ©   (2007-07-27 11:18) [7]

Написал так:

Function GetLocalTime(tm: tdatetime):tdatetime;
var a,b: TSystemTime;
begin
DateTimeToSystemTime(tm,a);
SystemTimeToTzSpecificLocalTime(nil,a,b);
GetLocalTime:=SystemTimeToDateTime(b)
end;

Думаю пойдет. (?)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
6-1170350365
Vitaliy U.S.
2007-02-01 20:19
2007.10.07
Интернет серфинг и TWebBrowser


15-1189400391
boriskb
2007-09-10 08:59
2007.10.07
85 правил русского языка


6-1170928218
tytus
2007-02-08 12:50
2007.10.07
TWebBrowser и Java.


3-1180932304
Strang
2007-06-04 08:45
2007.10.07
fn_listextendedproperty


2-1189157503
Ega23
2007-09-07 13:31
2007.10.07
Уточните, плиз




   Наверх