Что за глюк с вычислениями времени?

← →
Aleksandr (2003-05-20 11:20) [0]

Вызываю DaysBetween() между двумя полями типа TDate (20.05.2003 и 30.05.2003). Говорит, что 11 дней. Ввожу цифрами (в эвале) 37777 и 37767 - тоже считает, что 11... Что это за прикол?

← →
dtrn (2003-05-20 11:33) [1]

Формула = date1 - date2 +1
20..30 = 11

← →
AleksandrKu (2003-05-20 11:38) [2]

а ты сам на пальцах посчитай
20 -1
21 -2
...
30 -11

← →
Aleksandr (2003-05-20 11:47) [3]

Да вот нифига. В другой программе по тому же механизму правильно считает. А в этой, кстати, после пары перекомпиляций вообще -1 стала возвращать (при том, что у меня выражение стоит в abs).
Чего на пальцах считать, открой калькулятор и прибавь к 20 10. Сколько будет?

← →
Verg (2003-05-20 12:04) [4]

Тем не менее:

function DaysBetween(Date1, Date2: TDateTime): Longint; begin Result := Trunc(Date2) - Trunc(Date1) + 1; if Result < 0 then Result := 0; end; (C) RxLib

Если тебя не устраивает эта функция, то считай сам :

trunc(Date2)-trunc(Date1)

← →
Johnmen (2003-05-20 12:08) [5]

Ну если тебе в лом глянуть хелп, то :
(целое число суток)
20.05.2003 - 1
21.05.2003 - 2
...
30.05.2003 - 11

← →
Anatoly Podgoretsky (2003-05-20 12:19) [6]

Aleksandr © (20.05.03 11:47)
А ты какую дату не считаешь, 20 или 30?
Тогда по твоей логие должно быть 9 дней, это именно столько между 20 и 30

Что за глюк с вычислениями времени? Найти похожие ветки