Форум: "Основная";
Текущий архив: 2004.08.01;
Скачать: [xml.tar.bz2];
ВнизПочему D7 неправильно вычисляет выражение. Скоро поедет крыша Найти похожие ветки
← →
Alex197777777777777 (2004-07-15 11:09) [0]Переменная D должна быть отрицательной, но такого не происходит:
var
D: integer;
D1,D2:TDateTime;
begin
D1 := Form1.TableDATA.FieldByName("DATATEXT").AsDateTime;
D2 := Date;
D := Trunc(D2) - Trunc(D1) + 1;
end;
D - постоянно дает положительные числа, хотя данные в D1 и D2 обязательно должны дать отрицательный результат
← →
stone © (2004-07-15 11:18) [1]
> хотя данные в D1 и D2 обязательно должны дать отрицательный
> результат
только в случае если D1 более чем на 2 больше D2
← →
Alex197777777777777 (2004-07-15 11:21) [2]Хоть на десять все равно результат положительный!!!
← →
Орехов Д.В. (2004-07-15 11:21) [3]С какого перепуга? Date - текущая дата. В таблице у тебя вряд ли будущие будут или нет? Так с чего отрицательные?
← →
Суслик (2004-07-15 11:24) [4]Очевидно, что у тебя date (это функция такая) больше чем Form1.TableDATA.FieldByName("DATATEXT").AsDateTime
← →
Alex197777777777777 (2004-07-15 11:24) [5]Все разобрался, крыша точно поехала, один день до отпуска.... :-)
← →
Юрий Зотов © (2004-07-15 11:29) [6]А виновата, как обычно, D7.
← →
Алхимик © (2004-07-15 13:03) [7]
> [6] Юрий Зотов © (15.07.04 11:29)
> А виновата, как обычно, D7.
Виновата просто D :)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.08.01;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 2.176 c