ActiveDelphi

[elidorio]

Olá Pessoal,

Estou tentando desenvolver um cupom não fiscal com FortesReport, só que não esta imprimindo, é para impressora BEMATECH TERMICA MP4200TH e BEMATECH MP-20MI DUAL 4420 e estou meio perdido, qual o tamanho do papel para definir no Fortes também?. Parece que ele não encontra o mapeamento da impressora. Estou usando o DosprintUI para fazer o mapeamento da porta USB para LPT1.

[ruysalles]

Nunca utilizei este recurso do Fortes, mas você pode imprimir direito para impressora via LPT1.

Imprimir Direto Para Impressora


procedure TForm1.Button1Click(Sender: TObject);
var
F : TextFile;
i : integer;

begin
AssignFile(F,LPT1);
Rewrite(F);
i := 0;
Writeln(F,Teste de impressao - Linha 0);
Writeln(F,Teste de impressao - Linha 1);
Writeln(F,#27#15+Teste de Impressão - Linha 2);
Writeln(F,Teste de impressao - Linha 3);
Writeln(F,#27#18+Teste de Impressão - Linha 4);
Writeln(F,Teste de impressao - Linha 5);
Writeln(F,#12); // Ejeta a página
CloseFile(F);
end;

Fonte: http://www.devmedia.com.br/dicas-imprimir-direto-para-impressora/3095#ixzz3wn32QDzF


Espero ter ajudado.