Resolver excepcion Impresora

[NEG1414]

Buenas

Como puedo evitar la excepcion There is no default printer currently selected.... que sucede cuando uso Printer y no tengo la impresora instalada, ¿y si la tengo instalada y no conectada?

Gracias

[Angel.Matilla]

Se me ocurren varias cosas:
1. En la propiedad Printers de TPrinter esta la lista de impresoras instaldas.
2. El tipico try...catch en el momento de imprimir el documento.

[NEG1414]

Gracias por contestar...

Me podrias indicar cual seria la condicion para evitar la excepcion al no tener instalada la impresora..

¿Seria la misma si la impresora esta instalada y no encendida..?

Gracias Otra vez..

[Angel.Matilla]

Empezado por NEG1414

Me podrias indicar cual seria la condicion para evitar la excepcion al no tener instalada la impresora..

¿Seria la misma si la impresora esta instalada y no encendida..?

Gracias Otra vez..

Lo primero que te decía del TPrinter lo tienes en Tips&Tricks de del Club Builder; yo he adaptado aquel código y lo he puesto así:

TPrinter *Printer = new TPrinter();
if  (Printer->Printers->Count > 0)
     QuickReport1->Print();

Esto sería para comprobar que hay alguna impresora instala. La segunda opción podría ser así:

try
{
     QuickReport1->Print();
}
catch(...)
{
     ShowMessage("La impresora no está disponible.");
}

Puedes combinar ambas.

[juanelo]

El problema, es que casi estoy seguro que ese mensaje es precisamente el resultado de una excepcion que cachó el reporteador, y que desafortunadamente no propagó como exepcion (throw). Lo cual se traduce en que no tenemos nada que cachar como exepcion. Es mi teoria pero no estoy 100% seguro.
Saludos