Как я могу аварийно завершить работу приложения Delphi7? - PullRequest
0 голосов
/ 08 февраля 2019

Мне нравится вводить сбой в приложении Delphi7.Мне нравится делать это , чтобы поэкспериментировать с аварийным дампом и добраться до того же места, где я ввел неисправный код.

Ниже приведен код, который запускается при нажатии кнопки в форме:

procedure TForm1.Button1Click(Sender: TObject);
var
  x : Integer;
  y : Integer;
begin
  //Try Crashing the WebLink Dll (For a Reserach)
  x:=0;
  y:=0;
  y:= x div y;
end;

end.

Когда я выполняю приведенный выше код в отладчике или дважды щелкаю исполняемый файл, я получаю следующее сообщение.Но приложение не падает.Значит, после нажатия OK в диалоговом окне я могу нажать кнопку «1» еще раз.У меня нет кода обработки исключений.Но как процесс не удаляется из операционной системы?Что такое код, который я должен написать в delphi-7, чтобы приложение завершало работу после отображения сообщения об ошибке

enter image description here

...