ecf epson tm-t20 exemplo

[pena]

Alguem teria um exemplo pra comunicar e imprimir usando a epson tm-t20, tenho da bematech e daruma e foi facil de fazer, com esta medonha to apanhando

[fladimir]

TM-T20 q eu saiba não é ECF e sim uma impressora termica q pode ter comunicação via USB, Ethernet, Serial

Nesse caso se estivermos falando da mesma impressora a forma de imprimir é a mesma utilizada nas demais impressoras térmicas, no caso eu uso assim,

Se compartilhar ela, depois mapeia via NET Use como se fosse uma LPT1 e faz um Copy File (nome do arquivo TXT com os comandos ESC/POS etc) TO PORTA

Se for usar via Driver utilize o win_Prn():New( NomedaImpressoranoWindows ) e os comandos necessários da classe.

Partindo do principio q já imprima em impressoras USB, a explicação acima resolveria.

Agora se não imprime em USB ai tem q primeiro resolver esta parte pra depois direcionar pra impressora em questão.

[pena]

Desculpe pela ignorância, foi muito tempo imprimindo com impressora fiscal, por isso o termo ecf, mas é isso mesmo, o drama é que preciso imprimir nfc-e, o problema é o QrCode, que na bematech e daruma basta chamar a dll, porém na epson não funciona, como se não carregasse a dll

[wagner_fix]

Boa noite, estou com o mesmo problema.
E estou apanhando bastante, estou usando Delphi e não encontro nenhum modelo, e os que eu achei não consigo se comunicar com a .dll alguém poderia nos dar uma luz?
Grato,
Wagner

[pena]

Tentei com C# sem sucesso também, neste caso carrega a DLL, acha os métodos, mas quando envio comando pra ela, nada faz, eu instalei como se fosse uma impressora comum, conforme manda o manual.

[MSDN]

Eu imprimo nessa impressora, para tal faço o seguinte : ( foi a que achei mais prática para o meu caso, mas funciona )

1 - Utilizo um software que cria uma porta COM associada á uma impressora instalada via USB, para saber como fazer e baixar, veja neste link http://wiki.adaptive.com.br/index.php/E ... ra_ECF_USB

2 - Para imprimir

Código: Selecionar todos

	IF MsgYesNo('Imprimir CUPOM NÃO FISCAL ?')
        TRY
          SELE fecha
          fecha->(DBGoTop())
          SET PRINTER ON
          SET PRINTER TO COM5 //definido usando software porta virtual
          SET CONSOLE OFF

          ? '------------------------------------------------'
          ? '         CUPOM PARA SIMPLES CONFERENCIA'
          ? '             NAO E DOCUMENTO FISCAL'
          ? '        COMA BEM RESTAURANTE E LANCHES'
          ? '================================================'
          ? 'DATA      : '+dtoc(date())+'  HORA: '+time()
          ? '------------------------------------------------'
          ? 'PRODUTO                  QTD    UNIT.  SUB-TOTAL'
          ? '------------------------------------------------'

          WHILE .NOT. Eof()
               ? SubStr(fecha->nomeprod,1,25)+' '+Str(fecha->qtd,6,3)+' '+Str(fecha->unitario,5,2)+' '+Str(fecha->subtotal,8,2)
               v_desconto  := ( v_desconto + fecha->desc )
               v_acrescimo := ( v_acrescimo + fecha->adic )
               v_soma      := ( v_soma + fecha->subtotal )
               fecha->(DBSkip())
          END

          ? '------------------------------------------------'
          ? '                      SUB-TOTAL R$ ' + Str(v_soma,10,2)
          ? '                      SUB-TOTAL R$ ' + Str(v_acrescimo,10,2)
          ? '                      SUB-TOTAL R$ ' + Str(v_desconto,10,2)
          ? '                      SUB-TOTAL R$ ' + Str((v_soma+v_acrescimo)-(v_desconto),10,2)
          ? '------------------------------------------------'
          ? 'Agradecemos a preferencia, Volte Sempre !'
          ? ''
          ? ''
          ? ''
          ? ''
          ? ''

          SET CONSOLE ON
          SET PRINTER TO
          SET PRINTER OFF

		// cortar o papel

          v_comando = fcreate( "COM5",0 )
          fwrite( v_comando, CHR(27)+"d"+CHR(3) )
          fwrite( v_comando, CHR(27)+CHR(109) )
          fclose( v_comando )
        CATCH
          Alerta('Falha na impressão','ATENÇÃO',3)
        END
     ENDIF

Caso queira tirar alguma dúvida, meus contatos estão na assinatura.

Abraços

[wagner_fix]

Direto pelo o IDE eu também tive sucesso, mas queria usar pela a DLL...
Mesmo assim muito obrigado pela resposta, vamos ver se alguém tem alguma solução sobre as DLL.

Se alguém precisar eu tenho um exemplo em delphi, consegui imprimir / cortar papel / imprimir imagem

Grato,
Wagner

[pena]

Wagner, eu quero

[MSDN]

Eu não tenho resposta pronta....rsss, mas talvez isso ajude !

Qual a diferença entre Printer Class e Vender Class da Impressora EPSON TM-T20 ?
https://www.oobj.com.br/bc/article/qual ... 0-454.html

Como configurar a impressora Epson TM-T20 USB para utilizá-la com a InterfaceEpsonNf.dll ?


Abraços

[rubens]

Não serve o ACBRmonitor?

[wagner_fix]

MSDN, muito boa a observação mas já tinha feito... O problema é que eu não acho essa tal .dll no site, todos os links estão quebrados. A única .dll que eu achei foi na internet. Possa ser ela que está com problemas...

Pena segue o código

Para imprimir logo

var
Bitmap: TBitmap;
begin
BitMap:=TBitmap.Create;
BitMap.LoadFromFile('C:\EDI\logo0.bmp');
with Printer do
begin
BeginDoc;
Canvas.Draw(25,25,BitMap);
EndDoc;
end;
BitMap.Free;

Para imprimir texto

var
i: Integer;
lst: TextFile;
begin
AssignPrn(lst);
Rewrite(lst);
Writeln(lst, '');
Writeln(lst, Centraliza(UpperCase(FormatDateTime('"Cidade", dd " DE " mmmm " DE " yyyy "."', Date)),48));
Writeln(lst, '');
Writeln(lst, '');
Writeln(lst, '');
Writeln(lst, Centraliza('ASS. :____________________________________',48));
Writeln(lst, '');
Writeln(lst, Centraliza(Trim('*** VOLTE SEMPRE!!! ***'),48));
CloseFile(lst);

[MSDN]

Tenta baixar nesse link : https://download.epson-biz.com/modules/ ... t=3&pid=37

outros links para ajudar

https://www.oobj.com.br/bc/article/como ... l-455.html

http://www.sfhera.com.br/suporte/2017/0 ... -epson-nf/

OBS : pelo jeito a DLL não é um arquivo que vc baixa avulso, e sim instalado através de um dos programas da Epson.

Abraços

[wagner_fix]

MSDN primeiramente gostaria de agradecer por você ter tirado um tempo para me responder.

Esses link já testei todos.

Se o link funciona encaminha para o site da Epson mas não tem a .dll

Se vai para outros link, está tudo quebrado erro 404

E verifiquei se a .dll está na instalação, infelizmente não é o caso.

Quem sabe alguém do grupo tem esse bendito .dll e compartilha conosco.

Grato,
Wagner

[edsonfast]

Achei aqui: ftp://ftp.zanthus.com.br:2142/pub/Zeus_ ... sao_1_9_8/