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

Вниз

datatime + - gmt   Найти похожие ветки 

 
Sopelka   (2015-03-02 16:06) [0]

dxe7.

...
dt,new_dt:tdatetime;gmt:real;
begin
dt:=now;
gmt:=-3.5;
new_dt:=MyFunc(dt,gmt);
showmessage(datetimetostring(new_dt));
end;
...
function MyFunc(dt,gmt):tdatetime;
begin
result:=... ??
end;

нужно из даты получить новую, с учетом смещения gmt
подскажие функцию или алгоритм


 
junglecat ©   (2015-03-02 16:11) [1]

result := dt + gmt / 3600;


 
junglecat ©   (2015-03-02 16:16) [2]

вернее так
result := IncMinute(dt, gmt * 60)


 
Sopelka   (2015-03-02 16:33) [3]

ясно, спасибо.
+
в этом случае gmt должно быть integer. а если оно не целое?


 
junglecat ©   (2015-03-02 16:39) [4]

есть еще IncSecond и IncMillisecond


 
Германн ©   (2015-03-03 01:08) [5]


> Sopelka   (02.03.15 16:33) [3]
>
> ясно, спасибо.
> +
> в этом случае gmt должно быть integer. а если оно не целое?
>

А что тогда означает gmt для тебя?


 
junglecat ©   (2015-03-03 08:42) [6]

> а если оно не целое?

а какие проблемы? в зависимости от нужной точности приводи к ближайшей целой единице - минуты, секунды


 
icWasya ©   (2015-03-03 09:45) [7]

> а если оно не целое?
Поясное время устанавливается с шагом в полчаса, поэтому в минутах оно всегда целое.


 
В-ес-на   (2015-03-03 14:31) [8]

Удалено модератором


 
Inovet ©   (2015-03-03 16:30) [9]

Удалено модератором



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

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

Наверх




Память: 0.48 MB
Время: 0.033 c
2-1423343442
Andrey K
2015-02-08 00:10
2017.01.15
Как работать с портом LAN


15-1448881398
Анна
2015-11-30 14:03
2017.01.15
имеет ли право начальство поставить программу считывания информ


15-1456319592
Копир
2016-02-24 16:13
2017.01.15
Порой опять гармонией упьюсь, Над вымыслом слезами обольюсь...


15-1451124375
megavoid
2015-12-26 13:06
2017.01.15
Дамы и господа, не забываем про round :)))


2-1425461509
Asher
2015-03-04 12:31
2017.01.15
Сортировка дат в TStringList