![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отключение контроля ошибок
Zver1992 © (2006-12-24 12:26:00)Как отключить в программе контроль ошибок? Конкретно интересует отключенние ошибки "is not valid integer value". Совсем. На работоспособность не влияет.
Джо (2006-12-25 00:25:00) [1]
> if (E.ClassType.ClassName='EConvertError') then
Если уж непременно хочется делать ректально, то хотя бы без особых извращений, то есть, например, так:
if E is EConvertError then
В вообще, лучше [1].
Loginov Dmitry (2006-12-25 00:22:00) [2]> if (E.ClassType.ClassName='EConvertError') then
Абалдеть!
Handle (2006-12-24 13:51:00) [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"
BanserAnt (2006-12-24 13:01:00) [4]И где это у тебя такая ошибка возникает и чтоже делать если она возникла, продолжать работать с неверными данными. Ну тогда замени все строковыми литералами и ошибок не будет и работать тоже.
Virgo_Style (2006-12-24 12:54:00) [5]может, проще их не допускать? Или перехватывать исключение?
Опять-таки StrToIntDef и TryStrToInt есть.