Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.017 c
2-1424288600
AndrewAndrey
2015-02-18 22:43
2017.01.15
Связь полей таблиц SQLite


15-1452881433
xayam
2016-01-15 21:10
2017.01.15
Приглашаю на шахматный турнир Delphi Masters 4 (2016)


2-1424366803
Black7777
2015-02-19 20:26
2017.01.15
Обмен данными БД от клиентов


15-1454424089
JohnKorsh
2016-02-02 17:41
2017.01.15
Установка Embarcadero XE7


2-1423485605
lewka
2015-02-09 15:40
2017.01.15
Запрос в MS Access




   Наверх