diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2015-09-01 15:01:07 +0100 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2015-09-01 15:01:07 +0100 |
commit | 4e3d962b7562019fad2dbf188ccaa6d6719b2432 (patch) | |
tree | 0b1a376008a61f1deba8349c7971844b31132b1f /docview/src | |
parent | 74c823f08bc0774fb125d8271208e86a84ed0d5c (diff) | |
download | fpGUI-4e3d962b7562019fad2dbf188ccaa6d6719b2432.tar.xz |
docview: reuse fpgApplication.ShowException() instead.
Diffstat (limited to 'docview/src')
-rw-r--r-- | docview/src/frm_main.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/docview/src/frm_main.pas b/docview/src/frm_main.pas index 00a192ea..a74b4027 100644 --- a/docview/src/frm_main.pas +++ b/docview/src/frm_main.pas @@ -306,7 +306,7 @@ const procedure TMainForm.MainFormException(Sender: TObject; E: Exception); begin - TfpgMessageDialog.Critical('An unexpected error occurred.', E.Message); + fpgApplication.ShowException(E); end; procedure TMainForm.lbIndexKeyPress(Sender: TObject; var KeyCode: word; |