From 89b3fcbbdb90e1e0ca22067a5e96f929601cdc89 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <anse@heidisql.com>
Date: Wed, 25 Oct 2023 06:57:38 +0200
Subject: [PATCH] Fix crash in printer dialog, when printer is somehow not
 available

---
 source/printlist.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/source/printlist.pas b/source/printlist.pas
index 6f61dc30..2b5b2b85 100644
--- a/source/printlist.pas
+++ b/source/printlist.pas
@@ -81,7 +81,12 @@ begin
     else list := Mainform.ActiveGrid;
   end;
   if Assigned(list) then
+  try
     list.Print(Printer, chkPrintHeader.Checked);
+  except
+    on E:EPrinter do
+      ErrorDialog(E.Message);
+  end;
   Screen.Cursor := crDefault;
 end;