Главная страница
    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.06 c
15-1178379472
ArtemESC
2007-05-05 19:37
2007.06.03
Ищу простую утилиту для сравнения содержимого...


2-1179132870
Taniana
2007-05-14 12:54
2007.06.03
Подскажите путь в программе с IP-адресом!!!


15-1178791060
Руслан
2007-05-10 13:57
2007.06.03
Можно ли включить компьютер с помощью сетевой карты?


3-1173848130
Lavrenty
2007-03-14 07:55
2007.06.03
Экспорт данных из Access в XML


2-1178972587
SKIPtr
2007-05-12 16:23
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский