Показать сообщение отдельно
  #8  
Старый 17.03.2009, 11:21
Аватар для KOOL
KOOL KOOL вне форума
Активный
 
Регистрация: 06.01.2008
Адрес: Рязань
Сообщения: 306
Версия Delphi: 2009
Репутация: 6150
По умолчанию

Еще можно проверять по такому же принципу, как проверяет процессор:
Код:
z:=x+y;
if ( (x>0) and (y>0) and (z<0) ) or ( (x<0) and (y<0) and (z>0) )then
  ShowMessage('Overflow')
else
  ShowMessage(IntToStr(z));
__________________
РГРТУ - ФВТ - Системы Автоматизированного ПРоектирования. ت
Ответить с цитированием