Detectar Error de impresión.

[DeLiRioS]

Buenas amigos, quién pueda me da una manito por favor. Utilizo delphi 7 y mysql, y necesito imprimir en una EPSON BIXOLON SPR-270 (Ticketera) imprime todo bien, pero el unico problema es el siguiente, que en el caso de que la impresora este apagada, desconectada o sin papel al momento de enviar la impresión, mi aplicación se bloquea osea se cuelga, queda en espera y debo terminar el proceso y volver entrar. Imagino que habrá que utilizar algunos comandos de la impresora, tengo el manual pero nose como aplicarlos en delphi gracias de antemano.Este es el código:

Código Delphi [-]
 
Assignfile(iImpresora,'Lpt1'); //Puerto: LPT1, COM1, etc;
Rewrite(iImpresora);
Writeln(iImpresora,'Hola mundo');
Write(iImpresora, Cortapapel);
CloseFile(iImpresora);

[DeLiRioS]

Ah creo q es un buen detalle decir que utilizo windows Xp profesional... por ahi estuve leyendo que sobre la funcion Getprinter no es compatible con cualquier Sistema Operativo.