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

Вниз

Завершение приложения после исключительной ситуации   Найти похожие ветки 

 
programmist87 ©   (2007-05-11 23:16) [0]

В программе сгенерировал исключительную ситуацию:

raise Exception.Create("...");

Нужно чтобы после генерации своего исключения приложение завершилось. Но как я понял, следующий за этими операторами исходный текст игнорируется. А при нажатии в сгенерированном окне исключения кнопки ОК приложение автоматически не завершается. Как в таком случае автоматически завершить приложение?


 
Kolan ©   (2007-05-11 23:25) [1]

try
 &#133
 raise Exception.Create("&#133");
except
 Close; //Завершение.
end;  


Еще можно посмотреть компонент TApplicationEvents


 
Sergey Masloff   (2007-05-11 23:26) [2]

try
except
 on e : MyException do
   Закрываю приложение


 
DrPass ©   (2007-05-11 23:26) [3]


> Но как я понял, следующий за этими операторами исходный
> текст игнорируется

Для того, чтобы исполнить какой-либо код независимо от того, произошло исключение или нет, используй блок try...finally. Для "глобального" отлова исключений есть событие Application.OnException


 
{RASkov} ©   (2007-05-11 23:52) [4]

> [0] programmist87 ©   (11.05.07 23:16)

А может и не надо ее(искл ситуацию) генерить? Вместо генерации показал мессагу, что кирдык мне и закрыл прогу.....



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

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

Наверх





Память: 0.45 MB
Время: 0.042 c
11-1160821604
vampir_infernal
2006-10-14 14:26
2007.06.03
Exception, TNotifyEvent и не только


15-1178037925
sayuki
2007-05-01 20:45
2007.06.03
Version Control


1-1175837354
tytus
2007-04-06 09:29
2007.06.03
Как показать хинт?


15-1178610800
boriskb
2007-05-08 11:53
2007.06.03
Сбережем дельфийский сайт от флуда про политику! :)


2-1179307471
V9
2007-05-16 13:24
2007.06.03
Подскажите функцию определения високосного года





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский