IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Отключение контроля ошибок, как отключить контроль ошибок в Delphi???
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 58
Пол: Мужской
Реальное имя: Константин

Репутация: -  1  +


В паскале контроль ошибок отключается так: {-$I} как подобное, если это возможно сделать в делфи????

соррю, если уже обсуждалось...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






А можно узнать, зачем тебе это понадобилось в Дельфи? Есть же
Try
// Делаешь что-то
Except
// Если произошла ошибка - придешь сюда, и обрабатывай ее
End;
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Пионер
**

Группа: Пользователи
Сообщений: 58
Пол: Мужской
Реальное имя: Константин

Репутация: -  1  +


ок.. попробую так.. спасибо!!!!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Еще есть вариант обработки try..finally..end; отличается тем, что блок finally выполнится независимо от того возникла ли ошибка. Вообще прочитай про обработку исключительных ситуаций в Delphi, в любой книге должно быть.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Пионер
**

Группа: Пользователи
Сообщений: 58
Пол: Мужской
Реальное имя: Константин

Репутация: -  1  +


ну вот например мне надо проверить существует ли файл кот. мы прописали в Edit1 ..
тогда это будет выглядеть примерно так:
try
Assignfile(f,edit1.text);
if ioresult=1 then
showMessage('Файл не найден')
else
reset(f);
except

???????
подскажите плиз...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






Вот так это будет выглядеть:
try
Assignfile(f, edit1.text);
Reset(f);

// Продолжаем обработку файла - он успешно открыт

except
// ошибка при открытии файла - пришли сюда...
showMessage('Файл не найден');
end;
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Пионер
**

Группа: Пользователи
Сообщений: 58
Пол: Мужской
Реальное имя: Константин

Репутация: -  1  +


ок.. теперь все понятно просто вгоняло в тупик то, что в самой среде при компилляции все равно ошибка выдается.. smile.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 21:55
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name