Imprimir escogiendo nombre de impresora

[el_barto]

Buenos dias, tengo un sistema creado en delphi version 5, base de datos oracle y simplemente estoy haciendo un select y se guarda en un archivo de texto pero cuando deseo mandarla a imprimir necesito solo escoger el nombre de la impresora:

por ejemplo si tengo una red y estan configuradas dos impresoras, si le doy el nombre de la primera:

imprHp apollo, pues deberia imprimir por la impresora que responda a ese nombre.

pero si escojo imprxeroxa1 pues debe imprimirse por la impresora que responda a ese nombre.

¿ Que componente o linea de codigo se puede emplear para usar esta funcion ?

Gracias por todo

[Neftali [Germán.Estévez]]

Lo que yo he hecgo alguna vez, es cambiar la impresra por defecto antes de enviar la impresión y justo después volver a restaurar la que había.
No es una solución que me parezca muy "optima" y tengo claro que el algun caso puede dar problemas, pero es que no he encontrado otra.

Utilizando

Código Delphi [-]
  i := Printer.Printers.IndexOf('NombreDeTuImpresora');

Puede acceder dentro de la lista de impresoras al índice de la tuya.
Lugo guardar el valor de la actual y lo cambias:

Código Delphi [-]
      _Actual := Printer.PrinterIndex;
      // Asignarle la impresora 'NombreDeTuImpresora'
      Printer.PrinterIndex := i;

Una vez que hayas enciado la impresión restaura la que había.
Es bueno utilizar un try..Except para asegurarte de que restauras en cualquier caso la impresora por defecto.

[el_barto]

Buenos dias, me surge un inconveniente con tu respuesta neftali, en mi delphi version 5 no esta instalado el componente Tprinter entonces pense hacerlo por DOS y usar algun metodo en delphi que permita ejecutar una sentencia que sea bien interpretada por DOS.

como PRINT archivo.txt

No veo otra forma por ahora. gracias Neftali

[Neftali [Germán.Estévez]]

TPrinter no es un componente, es una clase; Basta con que añadas al uses la unit Printers.