In addition to displaying the exception message, which happens by default, the following code shuts down the application when a VCL exception is not caught and handled.
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnException := AppException;