IMPRESSAO CUPOM

Question

OLA PESSOAL, ESPERO QUE TODOS ESTEJAM BEM, SE NUM TIVER VAI FICAR HEHEHE!
PESSOAL TO COM 2 PEQUENOS PROBLEMINHAS COMO EU FA�O PARA IMPRIMIR UM CUPOM N�O FISCAL DEPOIS DA VENDA FINALIZADA EM
UMA IMPRESSORA GENERIC TEXT;

E TAMBEM EM UMA EPSON LX-300?

Frederico Brigatte*** · Answer

Boa tarde,Voc� teria o exemplo que a Claudia te passou sobre leitor de c�digo de barras?...

Frederico Brigatte*** · Answer

Seria esse link://www.devmedia.com.br/forum/leitor-codigo-de-barras/427462...

Glebson Guimaraes · Answer

puts irmao ela ainda num passou nao...

Gilvanio Gon�alves · Answer

A impressora Generic Text e Epson Lx 300, por padr�o utiliza porta LPT1

caso vc mande imprimir direto para a impressora, ser� impresso na impressora que
estiver definida como padr�o no windows, supondo que as duas estejam instaladas
no mesmo micro.

n�o sei qual componente vc vai usar para enviar a impress�o.
caso seja um quickreport, use ele como portrait, vc ter� a op��o de ter
um preview antes ou manda direto para print, tendo op��o tamb�m de
selecionar para qual impressora.

se for mandar direto via Lpt1 impresso direto veja o exemplo abaixo:

Com este exemplo voc� poder� enviar uma impress�o direto para a porta LPT1 da impressora
sem utilizar o Gerenciador de Impress�o do Windows.

procedure TForm1.Button1Click(Sender: TObject);
var
  Handle: TextFile;
begin
  AssignFile(Handle,'LPT1');
  Rewrite(Handle);
  try
    Writeln(Handle,'Impressao da Linha 1');
    Writeln(Handle,'Impressao da Linha 2');
    Writeln(Handle,#27#15+'Impressao da Linha 3');
    Writeln(Handle,'Impressao da Linha 4');
    Writeln(Handle,#27#18+'Impressao da Linha 5');
    Writeln(Handle,'Impressao da Linha 6');
    Writeln(Handle,#12);
  finally
    CloseFile(Handle);
  end;
end;

O c�digo acima imprime 6 linhas e ejeta a p�gina. O c�digo #27#15 liga a impress�o em negrito
e o c�digo #27#18 desliga.
O c�digo #12 ejeta a p�gina.

espero que seja isto que vc deseja.

obs. caso use porta usb , o codigo acima � o mesmo, por�m vc ter� que

compartilhar a impressora e informar o caminho. ex: no lugar de lpt1, \\nome_do_computador\nome_da_Impressora

At+

F�rum IMPRESSAO CUPOM #427646