Однако при работе программы выпадает стандартная ошибка и исключение не глушется
Да, такое бывает. В чем дело?
Просто вы запускает приложение из-под IDE, если запустить exe-файл, то все будет нормально, так как пользователь не будет видеть ошибки
Кстати, чтобы отключить эту фичу меню Tools -> Debugger Options -> Language Exceptions -> Stop On Delphi Exceptions.
Пример :
<{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}>
////////////////////////////////////////////////////////////////
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
y : integer;
begin
i := 7;
try
y := round(i/0);
except
ShowMessage('Ошибочка вышла :)!');
y := 0;
end;
Label1.Caption := IntToStr(y);
end;
//////////////////////////////////////////////////////////////
В примере при нажатии на кнопку, я хочу в Label вывести результат деления числа на ноль, если запускать приложение из IDE, то ошибка о делении на ноль будет все равно вылетать, а если запустить exe-файл, то все работает и появляется моя инфа об ошибке
Автор: Kanes