Клуб программистов

    Delphi процедура Abort останавливает текущую обработку и выходит к последнему исключительному блоку. В примере Abort - "отключающий", так как последнее сообщение не дошло до пользователя.

begin
    // Enter a try block
  Try
   ShowMessage('Before abort');
   Abort;
   ShowMessage('After abort');
  Except 
   On E : Exception do ShowMessage(E.Message + ' exception occured');
   end;
   ShowMessage('After try');
end;

Before abort
Operation aborted exception occured
After try