Исключение, вызывающее скачок в коде

Question

Я использую D5 и Synaps с OpenSSL, и он отлично работает. Я пытаюсь справиться с авариями, поэтому сознательно ввел плохие данные, по одной попытке. До сих пор я обрабатывал вызванные сбои в порядке, но я только что изменил пароль для входа и попытался войти в систему.

gMajorFail:=False; 
if not pop3.Login() then 
begin 
    gMajorFail:=True; 
    raise EPOP3.Create('POP3 ERROR: '+IntToStr(pop3.Sock.LastError)+ 
        ' When trying to Login to Account'); 
end; 
if gMajorFail then GoTo HadFailure; 

Вместо того, чтобы прыгать на HadFailure-Label, он переходит к последней строке кода в процедуре.

Я попытался использовать Try/finally (именно поэтому я использую Label to GoTo), но он по-прежнему пропускает право до последней строки кода.

Где я ошибаюсь и как я могу это исправить?

Благодаря

Answer 1

о мальчик ... убить этого GoTo с огнем.

При этом, когда вы поднимаете исключение, которое является концом строки, оно не возвращает управление остальной части вашего метода - выполнение немедленно передается обработчику исключений (то есть: инициируется ближайший родительский блок except/finally или , если он не существует, вы получаете диалоговое окно «необработанное исключение»). Когда вы поднимаете исключение, вы по существу бросаете свои руки и предполагаете, что это означает, что ваш собственный код не имеет дополнительной обработки ошибок, которая может исправить проблему и что вам больше нечего делать. Если вам нужно очистить или иным образом установить некоторые оставшиеся вещи, сделайте все это сначала, а затем поднимите исключение в качестве последнего, что вы делаете.

От the documentation:

Когда возбуждается исключение - то есть ссылка в рейзе заявлении - это регулируется специальной обработкой исключений логики. Оператор raise никогда не возвращает управление обычным способом. Вместо этого он передает управление самому внутреннему обработчику исключений, который может обрабатывать исключения данного класса. (Самый внутренний обработчик - тот, у которого попробуйте ... кроме того, что блок был недавно введен, но еще не вышел.)