Fórum Dificil. Descarregar buffer da impressora #151249
02/04/2003
0
AssignFile(arq,impressora);
Rewrite(arq);
Printer.Canvas.Font.Name := ´r_ansi´;
Printer.Canvas.Font.Size := 8;
For i := 0 to (MemoResLocal.Lines.Count - 1) Do
begin
writeln (arq, MemoReslocal.lines[i]);
end;
CloseFile(arq);
Estou usando essa função p/ imprimir um Memo, onde impressora é uma variável que recebe uma impressora da rede, mas quando mando a impressão a impressora HP fica em modo de espera, então tenho que apertar o botão que puxa a folha p/ começar a impressão.
Gostaria de saber se teria um comando p/ dizer p/ impressora que já mandou todo o conteúdo do memo p/ impressão, isto é, que já pode descarregar o buffer da impressora.
Obrigado.
Qualquer dúvida é só responder.
Rewrite(arq);
Printer.Canvas.Font.Name := ´r_ansi´;
Printer.Canvas.Font.Size := 8;
For i := 0 to (MemoResLocal.Lines.Count - 1) Do
begin
writeln (arq, MemoReslocal.lines[i]);
end;
CloseFile(arq);
Estou usando essa função p/ imprimir um Memo, onde impressora é uma variável que recebe uma impressora da rede, mas quando mando a impressão a impressora HP fica em modo de espera, então tenho que apertar o botão que puxa a folha p/ começar a impressão.
Gostaria de saber se teria um comando p/ dizer p/ impressora que já mandou todo o conteúdo do memo p/ impressão, isto é, que já pode descarregar o buffer da impressora.
Obrigado.
Qualquer dúvida é só responder.
Anonymous
Curtir tópico
+ 0
Responder
Posts
02/04/2003
E_gama
Envie um comando de salto de pagina ao final da impressao:
WriteLn(Arq, #12);
WriteLn(Arq, #12);
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)