Como Seleccionar una Impresora

[JANDREGUE]

hola amigos ...Nesecito de su valiosa ayuda,

Sucede que al momento de enviar a imprimir una Factura, deseo ver con anterioridad la lista de mis impresoras disponibles para así poder escoger una de ellas, en donde deseo enviar la impresión. Realmente no sé como hacerlo por eso les agradezco me colaboren

Gracias.

[[Lepe]]

En la paleta Dialogs de Delphi tienes PrintDialog y PrinterSetupDialog, añade el que quieras y despues:

Código Delphi [-]
  if printdialog1.execute then
  begin
      // el usuario aceptó la pantalla, imprimir lo que sea:
  end

saludos

Si usas QuicReport para tu factura, usa el método PrinterSetup:
( qrFact es el quickReport en diseño)

Código Delphi [-]
FrmQRFactura.qrFact.ReportTitle:= 'T.S.R.G. - Factura '+ DBEdit1.Text;

   // no documentado en QuickReport, si cancela, el usuario, el tag le asigna un valor

    FrmQRFactura.qrFact.Tag:= 0;
    FrmQRFactura.qrFact.PrinterSetup;
    if FrmQRFactura.qrFact.Tag = 0 then
    begin
      FrmQRFactura.qrFact.Printbackground;

      while FrmQRFactura.qrFact.QRPrinter.Status <> mpBusy do
      begin
        Application.HandleMessage;
        Application.ProcessMessages;
      end;

      while FrmQRFactura.qrFact.Available = False do
      begin
        Application.HandleMessage;
        Application.ProcessMessages;
      end;
    end;