Ayuda en impresion, puerto usb con impresora fiscal

[JohanRS]

Saludos a todos los "foreros":
Tengo un problema, tengo una impresora fiscal: ESPON TM-T88III, que tiene puerto paralelo pero que tengo que utilizar un convertirdor a USB, ya que la pc donde está conectado no tiene puerto paralelo ni para com.

Necesito saber como hago para (por medio de delphi 6) mandar a imprimir desde mi sistema, yo lo hago por medio del Assingfile, me ha servido para LPTI1 y COM1, etc, pero tengo problema con el USB.

Agradeceria la ayuda, este es mi primer aparicion en este foro...
Gracias de Antemano.

[coso]

Hola, para las impresoras de texto personalmente uso URaw (http://www.clubdelphi.com/foros/showthread.php?t=16156&highlight=URaw) aunque creo que mediante la variable Printer se puede conseguir sin necesidad de mucho codigo.

PD : igualmente, me parece que se crea un puerto :USB al momento de instalar una impresora USB

[JohanRS]

Gracias coso por tu respuesta, la revisare y pondre mi resultado aqui...

[JohanRS]

Trate de resolver mi problema con tu propuesta pero no me sirvio, alguna idea?

[coso]

Con el URaw? es extraño...ni siquiera miro el puerto al cual esta conectado, y uso esta unidad para las impresoras de tickets, que son usb la mayoria. Esta bien instalada la impresora?

[coso]

Puedes poner el codigo de impresion que usaste?

[JohanRS]

Lo unico que puedo decir, es que revisare la impresora, te aviso, gracias.

[JohanRS]

Revise la impresora y funciona bien, lo unico que puedo decir ahora es que no se como utilizar tu codigo el URaw, como funciona? que pasos debo hacer, debo agregar un componente del delphi o solamente utilizar las funciones y procedimientos que estan ahi.

[coso]

:) no es mio el codigo de URaw, solo lo uso. Te pongo una funcion


procedure Enviar_ticket(s : string);
var
xPrn: TRawPrint;
i : integer;
begin
xPrn := TRawPrint.Create;
xPrn.PrinterName := impres_tick;
// nombre de la impresora. Lo puedes encontrar correctamente en la
// variable printer. Pulsa f1 buscando printer para mas informacion.
// el URaw no es mas que una simplificacion del uso de printer para texto

xPrn.Document := 'envio';

if xPrn.Open = False then
raise exception.Create('Error en impresora.');

xPrn.Write(s);
xPrn.Write(#13#10#65#27#57);

xPrn.Close;
xPrn.Free;
end;

[coso]

Este tema, por eso, esta bastante tratado. Mira los posts de abajo o haz una busqueda del foro, que seguro que encuentras mas informacion.

[JohanRS]

Gracias por la ayuda y tomaré en cuenta tu comentario.