Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.08.30;
Скачать: [xml.tar.bz2];

Вниз

Как продолжить выполнение программы после искл. ситуации(raise)?   Найти похожие ветки 

 
VoyagerEternal ©   (2009-06-26 16:05) [0]

Как продолжить выполнение программы после искл. ситуации(raise)?

Задача такая:
загружаю с инета файл функцией:
http.Get("http:\\",FileStream);
если загрузка не удалась, функция генерирует исключительную ситуацию вызовом raise

вопрос: как продолжить выполнение процедуры при ошибке (исключительной ситуации)?


procedure TForm1.Button1Click(Sender: TObject);
begin

try
 http.Get("http:\\",FileStream);
finally
 //здесь программа выходит из процедуры если была ошибка
 //как заставить программу продолжить выполнять эту процедуру при ошибке?
end.

...//этот код не выполняется при ошибке (исключительной ситуации), а хочется

end;


 
Юрий Зотов ©   (2009-06-26 16:09) [1]

Посмотрите try-except


 
VoyagerEternal ©   (2009-06-26 16:20) [2]

try
http.Get(Url,F);
except on E:Exception do
end;

работает,
как теперь заставить http.Get не показывать сообщение об ошибке — оно мешает работе программы


 
DVM ©   (2009-06-26 16:28) [3]


> http.Get не показывать сообщение об ошибке — оно мешает
> работе программы

Это не твоя программа сообщение показывает это Delphi - в свойствах там где сними галку Stop On Delphi Exceptions


 
Юрий Зотов ©   (2009-06-26 16:29) [4]

> VoyagerEternal ©   (26.06.09 16:20) [2]

Попробуйте запустить программу НЕ из Delphi.


 
Ega23 ©   (2009-06-26 16:37) [5]


> как теперь заставить http.Get не показывать сообщение об
> ошибке — оно мешает работе программы


Если запустишь не из среды Delphi - будет всё нормально.
Если в среде не хочешь ошибку получать:
Tools -> Debugger Options -> Language Exceptions -> Stop on Delphi Exceptions (зависит от версии Delphi, у меня Notify on language exceptions)
Но с этой галкой осторожнее - я так, однажды её сняв и забыв обратно включить, бился почти день, ошибку искал.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.08.30;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.007 c
2-1246386849
AndrewG
2009-06-30 22:34
2009.08.30
Modal


2-1246642332
Dr. Genius
2009-07-03 21:32
2009.08.30
Окно, всплывающее над панелью системного трея


2-1246216548
Pasha
2009-06-28 23:15
2009.08.30
Обращение к ячейкам в БД


1-1213600067
IntruderLab
2008-06-16 11:07
2009.08.30
Работа с BPL модулями


15-1246480205
Юрий
2009-07-02 00:30
2009.08.30
С днем рождения ! 2 июля 2009 четверг





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский