impressora de cod. de barra intermec

Delphi

02/02/2005

Utilizo o delphi 7 e tenho uma rotina para impressão de cod. de barra em uma impressora intermec (easycoder C4)

Duvida:

Qual a melhor maneira de se fazer esta rotina. A impressora esta na porta USB.

Tentei utilizar a mesma rotina que utilizo para a argox, só trocando os comandos para os da intermec e a saida da porta, mas não funcionou.

A rotina que utilio na arox esta abixo (logico que não usei os mesmos comandos, mas não consigo fazer imprimir na porta usb (configurada como com4 na minha maq.

se alguem tiver uma dica eu agradeço.

AssignFile(Arquivox,´COM4´); //na argox utilizo LPT1 no lugar de com4
ReWrite(Arquivox);

Textox := ´N´;
WriteLn(Arquivox,Textox);

Textox := ´A34,220,0,4,1,1,N,´Nome do Produto 0000000000000000000000000´´;
WriteLn(Arquivox,Textox);

Textox := ´A34,249,0,4,1,1,N,´(Nome Cientifico 11111111111111111111111)´´;
WriteLn(Arquivox,Textox);

Textox := ´A34,220,0,4,1,1,N,´A34,277,0,4,1,1,N,´´´;
WriteLn(Arquivox,Textox);

Textox := ´A34,306,0,4,1,1,N,´Lote: 0000000 Fabrica‡Æo: XX/XXXX´´;
WriteLn(Arquivox,Textox);

Textox := ´A34,335,0,4,1,1,N,´ Validade..: XX/XXXX´´;
WriteLn(Arquivox,Textox);

Textox := ´LW1,383,1,1´;
WriteLn(Arquivox,Textox);

Textox := ´P2´;
WriteLn(Arquivox,Textox);


CloseFile(Arquivox);


Mfilho

Mfilho

Curtidas 0

Respostas

Dopi

Dopi

02/02/2005

Portas Seriais não se comportam da mesma maneira que portas Paralela...

Veja o ultimo Post desse tópico:
http://forum.clubedelphi.net/viewtopic.php?t=48327&highlight=impressao+direta

Acho que usar um .BAT com o MODE COM é a abordagem mais simples...


GOSTEI 0
POSTAR