Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.16;
Скачать: CL | DM;

Вниз

Обработка исключений   Найти похожие ветки 

 
Berg   (2003-01-05 10:30) [0]

При обработке исключения необходимо при возникновении ошибки выдать сообщение, а при ее отсутствии выполнить определенный блок кода. Делаю так, но при отсутствии ошибки, то что находится после else не выполняется, объясните, почему???
...
try
Table1.Post;
except on EDBEngineError do
begin
MessageDlg("SOS", mtWarning, [mbOk], 0);
Table1.Cancel;
end
else
begin
{Блок кода}
end;
end;
...


 
Delirium^.Tremens ©   (2003-01-05 10:31) [1]

Потому что в блок except..end попадаем только при наличии исключения


 
Skier ©   (2003-01-05 10:33) [2]

>Berg

try
Table1.Post;
{Блок кода}
except on EDBEngineError do
begin
MessageDlg("SOS", mtWarning, [mbOk], 0);
Table1.Cancel;
end;
end; //try



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

Текущий архив: 2003.01.16;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.02 c
14-49250
Olivka
2002-12-26 20:31
2003.01.16
Бесплатность? ShareWare FIBplus


14-49215
Ru
2002-12-29 15:25
2003.01.16
Именинники 1-го января (а также 30, 31 декабря)


1-49082
kolega
2003-01-04 22:49
2003.01.16
как исправить иероглифы?


14-49252
gsu
2002-12-26 18:37
2003.01.16
А нам завтра з/п дадут, на что бы потратить ?


3-48876
Подскажите
2002-12-19 15:51
2003.01.16
Нужно составить запрос