Ver Mensaje Individual
  #1  
Antiguo 25-03-2008
sysmar sysmar is offline
Miembro
 
Registrado: feb 2008
Posts: 15
Reputación: 0
sysmar Va por buen camino
Como imprimir en pto vitual USB001

Que tal amigos...

En muchas computadoras recientes ya no traen el puerto paralelo integrado, pero existen los adaptadores USB a CENTRONIC (que fue la solucion que adopte).

El detalle es que al instalar este tipo de adaptadores generan un puerto virtual (USB001, USB00x...) en Windows XP, para tener comunicacion con la impresora.

Estoy migrando una aplicacion FoxPro DOS 2.6 a Delphi 2007 (principiante) y las instrucciones para mandar imprimir que he encontrado son las siguientes:

procedure TForm2.Button1Click(Sender: TObject);
var
F: TextFile;
begin
AssignFile(F,'LPT1');
Rewrite(F);
WriteLn(F, 'Hello from Delphi.');
CloseFile(F);
end;

Esta prueba de impresion me funciono perfectamente para el puerto local LPT1, pero hice el cambio a USB001 y no manda imprimir la leyenda.

Podrian sugerirme alguna solucion.

Nota: Lo que deseo imprimir es el desgloce de partidas de una venta en una impresora para retail EPSON TM-U220, por lo que no es necesario configurar el tipo de hoja y margenes.

Gracias por su tiempo
Responder Con Cita