Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.05.2016, 19:26   #1
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию UnixToDateTime

Доброго времени суток!

Код:
Res := UnixToDateTime('1462379019');
date := DateToStr(Res);
получаю только дату 04.05.2016, а как получить и время?
nibufep вне форума Ответить с цитированием
Старый 04.05.2016, 19:33   #2
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

http://www.delphibasics.ru/DateTimeToStr.php
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 04.05.2016, 22:22   #3
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

а из-за чего разница в 5 часов?
nibufep вне форума Ответить с цитированием
Старый 04.05.2016, 22:37   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

может из-за часового пояса? (см. поясное время)
у вас какой часовой пояс? (UTC/GMT +сколько?)
Serge_Bliznykov вне форума Ответить с цитированием
Старый 04.05.2016, 22:40   #5
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

UTC +3 часа
nibufep вне форума Ответить с цитированием
Старый 04.05.2016, 22:44   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

хм... странно.

А посмотрите на stackoverflow - http://stackoverflow.com/questions/2...etounix-in-utc

ну, и если не поможет, тогда на этот пример - [Lazarus] UnixToDateTime and time zone
Serge_Bliznykov вне форума Ответить с цитированием
Старый 04.05.2016, 23:03   #7
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

Код:
    Res := UnixToDateTime(StrToInt(JSON.GetValue<string>('response[0].last_seen.time')));
    Res := UniversalTimeToLocal(Res);

    status_online.Caption := DateTimeToStr(Res);
попробовал так, не помогает
nibufep вне форума Ответить с цитированием
Старый 05.05.2016, 19:38   #8
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

up ...
nibufep вне форума Ответить с цитированием
Старый 10.05.2016, 07:45   #9
Masam
Пользователь
 
Регистрация: 19.11.2009
Сообщений: 19
По умолчанию

Можно так сделать:

Код:
Date:=DateToStr(UnixTimeToDateTime(strtoint(Edit1.Text)));
Time:=TimeToStr(UnixTimeToDateTime(strtoint(Edit1.Text)));
memo1.Lines.Add(Date+' '+Time);
Или так (DT - выходящая строка):
Код:
DateTimeToString(DT, 'dd/mm/yyyy hh:mm:ss', UnixTimeToDateTime(strtoint(Edit1.Text)));
О_о

Последний раз редактировалось Masam; 10.05.2016 в 10:33.
Masam вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск