From 12b158ba1c6f332a3114f695cb9a44497316846b Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Fri, 26 Aug 2011 06:24:19 +0000 Subject: [PATCH] Catch more types of potential exceptions in image preview box. See http://www.heidisql.com/forum.php?t=8980 --- source/main.pas | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/source/main.pas b/source/main.pas index ae24e7e4..2eaaaf33 100644 --- a/source/main.pas +++ b/source/main.pas @@ -2492,8 +2492,9 @@ begin IntToStr(Graphic.Width)+' x '+IntToStr(Graphic.Height)+' pixels, 100%, '+ FormatByteNumber(StrLen); spltPreview.OnMoved(spltPreview); - except on E:EInvalidGraphic do - lblPreviewTitle.Caption := ImgType+': ' + E.Message; + except + on E:Exception do + lblPreviewTitle.Caption := ImgType+': ' + E.Message + ' ('+E.ClassName+')'; end; FreeAndNil(ContentStream); end else