Как к "сейчас" прибавить время и вычислить новую дату и время?

← →
hghhhJ (2013-01-01 19:20) [0]

Здравствуйте!
С наступившим всех!

Подскажите, пожалуйста, как в Delphi, зная текущую дату и время (через функцию Now), прибавить к нему определенное число часов и минут, получить новые дату и время, а затем взять из этого значения отдельно саму дату и новое время???

Спасибо!

← →
Юрий Зотов © (2013-01-01 19:44) [1]

uses
DateUtils;

var
DT, D, T: TDateTime;

DT := Now;
DT := IncHour(D, 1);
DT := IncMinute(D, 30);
D := DateOf(DT);
T := TimeOf(DT);

← →
Dimka Maslov © (2013-01-01 20:06) [2]

Один час это 1/24 (одна двадцать четвёртая) суток. Одна минута это 1/1440 (одна тысяча четыреста сороковая). Время хранится как дробная часть вещественного числа.

D := Now + 1 / 24 + 30 / 1440; \\ Прибавили полтора часа

← →
hghhhJ (2013-01-01 20:22) [3]

Спасибо!

← →
Очень злой (2013-01-01 22:45) [4]

> зная текущую дату и время (через функцию Now), прибавить
> к нему определенное число часов и минут,

function GetNewDateTime(hour, min:integer); begin sleep(hour*3600000+min*60000); Result:=now; end;

:)

← →
Rouse_ © (2013-01-01 22:59) [5]

Есть множество нюансов :)
http://www.guildalfa.ru/alsha/node/7

← →
Sha © (2013-01-01 23:52) [6]

> Dimka Maslov © (01.01.13 20:06) [2]

за одно сложение будет точнее,
полтора часа или 90 минут - это конечная дробь (1/16)

← →
Dimka Maslov © (2013-01-02 12:49) [7]

> Sha © (01.01.13 23:52) [6]

Это только для примера. Сам я с этим типом не работаю, а предпочитаю получать дату и время напрямую при помощи соотв. функций WinAPI

← →
hghhhJ (2013-01-09 20:28) [8]

Спасибо Всем!
В результате воспользовался алгоритмом Sha

за одно сложение будет точнее, полтора часа или 90 минут - это конечная дробь (1/16)

т.к. алгоритм Dimka Maslov
давал погрешность ~2 мин. для одного вычисления

> т.к. алгоритм Dimka Maslov
> давал погрешность ~2 мин. для одного вычисления
>

Интересно бы посмотреть, как вы тестировали сей "алгоритм"?
:)

можно высчитать погрешность, не тестируя, ложный лишь последний знак.

Теоретически, [2] имеет точность в 1 секунду. никак не 2 минуты.

Как к "сейчас" прибавить время и вычислить новую дату и время? Найти похожие ветки