операционка XP
при выполнении ниже приведенного кода не возникает исключение
причем floattostr® = 'INF'




в 2003, 2008 исключение возникает нормально

может кто подскажет в чем дело и как это дело привести к норме.

Добавлено через 1 минуту и 56 секунд
пока такая ситуация выявлена только при делении на ноль

Если код в точности такой, то исключения и не должно возникать никогда. Ибо операции деления в исполняемом коде не будет. Компилятор её не включит в код.

и с каких это он ее не включит? 


Это сообщение отредактировал(а) bems - 10.1.2012, 01:23

С очень давних пор,  компилятор Дельфи научился не включать в исполняемый код заведомо неверные операции. 
То бишь. Если на этапе компиляции компилятор уверен, что будет "деление на ноль", он эту операцию в код не включит!

Для проверки достаточно включить сей код в проект, поставить breakepoint и посмотреть ViewCPU.
За Д1-Д3 не ручаюсь.

Это сообщение отредактировал(а) bems - 10.1.2012, 01:31

SetExceptionMask(GetExceptionMask - [exZeroDivide]);
это юнит Math. В старых версиях возможно только SetFpuExceptionMask

Модератор: northener, drkot, прекращаем спор о личностях

Это сообщение отредактировал(а) bems - 10.1.2012, 01:27

bems,  уже прекратил


можно чуть яснее, как для тупых полуночников

Это сообщение отредактировал(а) bems - 10.1.2012, 01:35

попробуй перед этим твоим куском кода выполнить SetExceptionMask(GetExceptionMask + [exZeroDivide]); 
Если исключение вернется, значит какой-то из подключаемых юнитов выключил тебе это исключение (с помощью той же SetExceptionMask). Как она работает можно узнать в хелпе (вкратце если exZeroDivide есть в маске, то исключения нет, иначе исключение есть)

Добавлено через 3 минуты и 16 секунд

эт оя о версии дельфи. Если в юните Math у тебя нету SetExceptionMask, то пробуешь вместо неё SetFpuExceptionMask

Добавлено через 7 минут и 3 секунды
под ХЕ2 мне удалось воспроизвести это только если результат операции нигде не используется (и вручную включить оптимизацию, потому что её убрали в дебажной версии)

к сожалению не помогает.
данная ситуация наблюдается только в XP, в серверных системах все отрабатывает нормально.
возможно это особенность ядра а не delphi

Добавлено через 10 минут и 39 секунд
bems,  в любом случае спасибо
буду переделывать алгоритм

GetExceptionMask/SetExceptionMask работают с управляющим словом сопроцессора, которое может испортить любая программа.
Почитайте об этом здесь:
Неочевидные особенности вещественных чисел

Кстати:

Внимательнее читаем справку:
"Call SetExceptionMask to specify the types of exceptions the FPU (floating-point unit) generates. Any element set in this mask prevents the FPU from raising the corresponding type of exception. Instead, the FPU returns its best attempt at a value – often NaN, Infinity, or NegInfinity."
Перевод подчёркнутого:
Любой элемент множества в этой маске предотвращает возникновение соответствующего типа исключения.



Это сообщение отредактировал(а) БелАмор - 10.1.2012, 06:34

в первый раз я написал правильно, кста. при повторном объяснении перепутал




Это сообщение отредактировал(а) bems - 10.1.2012, 21:41

нет, только код, работающий в том же процессе

2 bems
Я тоже прекратил. И даже не стал отвечать на приватное письмо ТС.

Но вот кто мне тогда скажет почему на Д2007 такой код:
 не только не выдаёт исключение, но и на брейпойнты плюёт?
Проверено и с {$O+}  и с {$O-}

у меня нет 2007 под рукой, но попробуй добавить в конец вывод r в консоль

Но ТС ничего не говорил о каком-то выводе результата деления. Он только упомянул что-то про "floattostr® = 'INF'".

ну это означает что у деления таки есть результат. А если нет использования результата (например вывода) компилятор вообще вправе выкинуть переменную

Это сообщение отредактировал(а) bems - 11.1.2012, 01:30