Dificil. Descarregar buffer da impressora

Delphi

02/04/2003

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.


Anonymous

Anonymous

Curtidas 0

Respostas

E_gama

E_gama

02/04/2003

Envie um comando de salto de pagina ao final da impressao:

WriteLn(Arq, #12);


GOSTEI 0
POSTAR