Вниз
Скачать: 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.013 c
2-1418918004
AlexeyTG
2014-12-18 18:53
2017.01.15
Просьба оценит "корявость кода"


15-1454189402
Юрий
2016-01-31 00:30
2017.01.15
С днем рождения ! 31 января 2016 воскресенье


15-1455954062
Beck
2016-02-20 10:41
2017.01.15
Правильная реализация


15-1454880601
Юрий
2016-02-08 00:30
2017.01.15
С днем рождения ! 8 февраля 2016 понедельник


2-1421840818
i2e
2015-01-21 14:46
2017.01.15
Изображения на SpeedButton




   Наверх