¿no se puede resumir en esto otro?
Código Delphi [-]
NumItem := Printer.Printers.IndexOf('PDF Creator');
if NumItem = -1 then
ShowMessage('error no encontrada la impresora 'PDF Creator')
Printers es de tipo TString y ya tiene el "IndexOf"
Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
|