Ver Mensaje Individual
  #1  
Antiguo 11-02-2008
Avatar de MAXIUM
MAXIUM MAXIUM is offline
Miembro
 
Registrado: may 2005
Posts: 1.488
Reputación: 21
MAXIUM Va camino a la fama
Exclamation Determinar puerto de impresión

Hola, quisiera saber que tipo de puerto usa la impresora determinada. Uso el siguiente código pero al mostara el tipo de puerto me aparece en blanco.

Código Delphi [-]
Uses Printers;

Type
      TPrinterDevice = Class Driver, Device, Port: String;

TForm1.Button1Click(Sender:TObject);
Begin
    // Para obtener el nombre de la impresora.   
       Label1.Caption:= TPrinterDevice(Printer.Printers.Objects[Printer.PrinterIndex].Device;

    // Para obtener el tipo de puerto.   
       Label2.Caption:= TPrinterDevice(Printer.Printers.Objects[Printer.PrinterIndex].Port;
End;
Responder Con Cita