Вниз
Скачать: CL | DM;

DateTimeToStr - Integer Overflow   Найти похожие ветки 

← →
NAlexey ©   (2003-04-30 11:00) [0]

Всегда ли необходимо инициализировать TDateTime? Иногда случается что попытка DateTimeToStr неинициализированной даты приводит к IntegerOverflow т.е:
var
ADate: TDateTime;
begin
DateTimeToStr(ADate);
//Integer overflow ^
end;
Получается что дата не равна нулю, а равна непонятно чему. У меня могут в процедуру приходить такие вот даты, как там проверять что она находится не в диапазоне?


← →
MBo ©   (2003-04-30 11:07) [1]

локальная переменная? Никто не гарантирует, что там не мусор


← →
V-A-V ©   (2003-04-30 11:09) [2]

При хорошем стиле вообше-то надо все переменные иниацелизировать,
тогда глюков не будет.
Компилятор, если ты не определил переменную присваевает ей бог знает какое значение...


← →
NAlexey ©   (2003-04-30 11:16) [3]

>локальная переменная? Никто не гарантирует, что там не мусор
Локальная, но представим что у меня из многих мест вызывается одна процедура, и как в ней проверить, что пришел IntegerOwerflow. Вот например так будет корректно:
if not (ADate < MinDouble) and (ADate > MaxDouble) then ...
Или как?


← →
MBo ©   (2003-04-30 11:20) [4]

что-то я тебя не пойму.
Раз уж неаккуратно пишешь, в try-except заключи DateTimeToStr


← →
Anatoly Podgoretsky ©   (2003-04-30 11:31) [5]

А какой смысл в данной операции DateTimeToStr(ADate);, получить низвестно что, даже в случаи отсутствия осключения?


← →
NAlexey ©   (2003-04-30 11:38) [6]

Необходимо так: если в качестве аргумента пришло недопустимое число, то приравнивать дату к нулю и выполнять дальнейшие действия.
Попробую перефразировать запрос: type TDateTime = type Double;
Так? Так. Но и не совсем так, значение далеко не MaxDouble а IntegerOverflow возникает. Так вот какая может быть максимальная и минимальная дата, чтобы с ней сравнивать и если значение не попадает в интервал делать её равной 0?


← →
NAlexey ©   (2003-04-30 11:51) [7]

Всё, спасибо нашел...



Страницы: 1 вся ветка

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



Память: 0.46 MB
Время: 0.008 c
1-34395
Tapchyk
2003-04-29 01:29
2003.05.12
Реестр


1-34467
dimon1979
2003-04-28 13:21
2003.05.12
Указатели


1-34430
Oleg__
2003-04-28 17:07
2003.05.12
WordApplication


14-34613
Soft
2003-04-24 14:03
2003.05.12
Win XP


3-34349
I.Ru.Ru
2003-04-22 08:35
2003.05.12
Какой формат СУБД лучше?Paradox?




   Наверх