Fórum Imprimir cupom em Matricial #184562
26/09/2003
0
estou tentando de tudo, como quickreport, com rdprint más quando termina de imprimir ele manda muito papel para fora(tamanho de uma carta).
se alguem tiver um exemplo para me passar ou algum comando para interromper o envio de papel para fora quando terminar a impressao.
valeu a todos,
Carlos Eduardo
Cernica
Curtir tópico
+ 0Posts
26/09/2003
Marcelo.c
Gostei + 0
26/09/2003
Cernica
Gostei + 0
26/09/2003
M@rcio
Jogue direto para a porta da impressora ultilizando o AssignFile
Ex:
var
F : TextFile;
begin
AssignFile(F,Porta);
Rewrite(F);
While not tblItems.eof do
begin
WriteLn(F,tblItensCodProd.Text+´ ´+tblItensItem.Text);
Next:
end;
CloseFile(F);
end;
Dica: Voce Pode Ultilizar a função StringOfChar para fazer o alinhamento de espaços
Ex: tblItensCodProd.Text+StringOfChar(´ ´,10-Length(tblItensCodProd.Text)+tblItensItem.Text;
Espero ter ajudado, Qualquer duvida mand-me um E-Mail
souzamarcio@bol.com.br
Gostei + 0
27/09/2003
Cernica
[color=darkred:f601a73656]var
F : TextFile;
begin
AssignFile(F,Porta);
Rewrite(F); [/color:f601a73656]
A Porta seria [color=darkred:f601a73656]LTP1[/color:f601a73656], certo
e [color=darkred:f601a73656]F[/color:f601a73656] , para q serve, qual seu valor?
grato
Gostei + 0
27/09/2003
Marcelo.c
Gostei + 0
28/09/2003
Cernica
Gostei + 0
28/09/2003
Marcelo.c
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)