未设置Windows默认打印机时出现“没有选择默认打印机”错误

Question

没有Windows默认打印机设置时，我需要打开“打印机对话框”。 设置Windows默认打印机时，可以使用以下代码正常工作。

TPrintDialog *dlgPrint = new TPrintDialog(frmDisplayDetail);
if( dlgPrint->Execute()) { //code here }

但是，如果Windows中没有默认的打印机设置，则dlgPrint->Execute()会引发异常：

没有选择默认打印机

要检查默认打印机索引，我使用了Printer()->PrinterIndex 。 没有Windows打印机设置时，此值变得不可访问：

错误E2122函数调用被地址XXX上未处理的异常XXX终止

难道我做错了什么？ 请提出解决方案。

Answer 1

仅当满足以下任一条件时， TPrinter::SetToDefaultPrinter()方法才会引发异常“当前未选择默认打印机”。

• Win32 API EnumPrinters()函数在使用（未记录的） PRINTER_ENUM_DEFAULT标志枚举时失败，并显示ERROR_INVALID_NAME错误代码。

• TPrinter::Printers列表不包含默认打印机。 如果上面的EnumPrinters()没有报告默认设备，则从Win32 API GetDefaultPrinter()函数（Delphi / C ++ Builder 2009和更高版本）或%windir%\\win.ini的[windows]部分的device值中查询默认值。 %windir%\\win.ini （Delphi / C ++ Builder 2007和更早版本）。

TPrinter::SetToDefaultPrinter()仅由以下方式调用：

• 如果FPrinterIndex成员当前为-1，则使用TPrinter::PrinterIndex getter。

• 如果FPrinterIndex成员当前为-1，或者属性设置为-1，则使用TPrinter::PrinterIndex setter。

TPrintDialog::Execute() （使用Win32 API PrintDlg()函数）首先调用TPrinter::GetPrinter()以获取当前所选打印机的DEVMODE的句柄，然后将其用于初始化对话框（通过PRINTDLG::hDevMode字段）。 TPrinter::GetPrinter()读取TPrinter::PrinterIndex属性，因此，如果当前没有选定的打印机且没有默认打印机，则会引发异常。

如果没有配置默认打印机，那么您基本上就不走运了，因为您甚至无法将TPrinter::PrinterIndex属性设置为> = 0的值，因为它会在检查新值是否匹配之前先调用SetToDefaultPrinter()当前值。

TPrinter Windows中未配置默认打印机，则TPrinter的失败/崩溃历史悠久。 若要解决此问题，您应该直接调用Win32 API PrintDlg()函数。 至少然后，您可以手动调用TPrinter::GetPrinter() （以获取初始DEVMODE ）并将其包装在try/catch块中，以丢弃它可能引发的任何异常。

如果对话框结果指示成功，则可以手动调用TPrinter::SetPrinter()将选定的打印机选项分配给TPrinter进行后续打印。

Answer 2

我在对话框用法之前检查打印机的存在：

// check printer interface
TPrinter *prn = Printer(); 
int pxs,pys,i=0;
if (prn==NULL)i=1;
if (prn->Printers==NULL) i=1;
if (prn->Printers->Count<=0) i=1;
if (i) return;
// use dialog
dlg_print->Options.Clear();
dlg_print->Options<<poPrintToFile;
if (!dlg_print->Execute()) return;
// print
prn = Printer();
pxs=prn->PageWidth;
pys=prn->PageHeight;
prn->BeginDoc();
for (i=0;i<dlg_print->Copies;i++)
    {
    if (i) prn->NewPage();
    // here render page into prn->Canvas as image in resolution pxs,pys
    }
prn->EndDoc();

dlg_print是我在对话框上放置的对话框。