try-except, перевод типов

[max38934]

1.Подскажите почему не работает данный код, как только V большое число, то сразу ошибка языка:

var V:double;
     temp:int64;
....
try
  temp:=round(V);
except
  ShowMessage('Ошибка !!!');
end;

т.е. если ф-я округления не сработает, то пусть выдаст ошибку!

2.Как можно записать данный код без ошибки???

var V:double;
    god:int64;
.......
   god:=V div (60*60*24*365);  // <-- ошибка!!!

[Kotofff]

Ошибка где ? При запуске из-под Делфи по F9 ?
Если да - то это нормально, Делфи по-умолчанию берет на себя обработки исключителных ситуаций подобных этой. А если запустить сам ехе-шник с проводника должно появится твое сообщение 'Ошибка !!!'

[max38934]

Kotofff, спасибо, что подсказал!