Отключение контроля ошибок

← →
Zver1992 (2006-12-24 12:26) [0]

Как отключить в программе контроль ошибок? Конкретно интересует отключенние ошибки "is not valid integer value". Совсем. На работоспособность не влияет.

← →
Virgo_Style © (2006-12-24 12:54) [1]

может, проще их не допускать? Или перехватывать исключение?
Опять-таки StrToIntDef и TryStrToInt есть.

← →
BanserAnt (2006-12-24 13:01) [2]

И где это у тебя такая ошибка возникает и чтоже делать если она возникла, продолжать работать с неверными данными. Ну тогда замени все строковыми литералами и ошибок не будет и работать тоже.

← →
Handle © (2006-12-24 13:51) [3]

public { Public declarations } procedure MyException(Sender:TObject; E:Exception); end; procedure TForm1.FormCreate(Sender: TObject); begin Application.OnException := MyException; end; procedure TForm1.MyException(Sender:TObject; E:Exception); begin if (E.ClassType.ClassName="EConvertError") then Exit; end;

В насторйках Tool\Debugger Options\Language Exceptions\Add... "EConvertError"

> if (E.ClassType.ClassName="EConvertError") then

Абалдеть!

> if (E.ClassType.ClassName="EConvertError") then

Если уж непременно хочется делать ректально, то хотя бы без особых извращений, то есть, например, так:
if E is EConvertError then

В вообще, лучше [1].

Отключение контроля ошибок Найти похожие ветки