[Saint Garry]

Пользуйся конструкцией Try .. except:

Код:

begin
try

// тут код проги

  except

   on e : EOverflow do
       begin
// тут код который виполнится при ошибке Floating point overflow
       end;
 end;

end.