Функция проверки переполнения в Delphi

[TEHb]

if (n>2 147 483 647) or (n<-2 147 483 648) then
begin
s:=intTostr(n);
n:=0;
end;
// работа с n


далее определим количество символов в n.
возьмём из s столько же последних символов переведём их в integer
сложим с n и прибавим к s как string

[_Dmitry]

а вообще-то ошибка вылетает при запущенном Delphi ? в процессе запуска ?
просто компилятор даже при всяких там try...except все равно перехватывает сам все ошибки ...
запусти прогу без компилятора ... просто exe-шник ...тогда наша обработка вступит в силу

Или же отключи: Tools->Debugger Options...->Language Exceptions->Stop on Delphi Exception
это для Delphi 7

[TimeChip]

Сообщение от Kotofff

в секции except

except
  on E.EIntOverflow do 
    begin     
     .....
     .....    { обработка ошибки переполнения };
     .....    { делайте что-нить }
    end;
end;

а вообще-то ошибка вылетает при запущенном Delphi ? в процессе запуска ?
просто компилятор даже при всяких там try...except все равно перехватывает сам все ошибки ...
запусти прогу без компилятора ... просто exe-шник ...тогда наша обработка вступит в силу

Вопрос, что в функции E.EIntOverflow значит E?, а то ошибку выводит <[Error] rekurs_.pas(48): Undeclared identifier: 'E'>

[Kotofff]

Модуль Messages подключен ?

[TimeChip]

Сообщение от Kotofff

Модуль Messages подключен ?

Да подключен! Че еще может быть?