Olá a todos estou com uma duvida relativamente simples, pequisei 
muito na web e achei algumas coisas, mas sem sucesso.
Bem e o seguinte utilizo um Epson Lx300 e gostaria que antes de 
enviar uma Nota Fiscal para a impressão retrocedesse o papel atual 
para que a impressão sempre comece do Inicio do papel. 

Obs. Achei como saltar pagina, avançar linha mas retroceder não.


var
F : TextFile;
i : integer;
begin
  AssignFile(F,'LPT1');
  Rewrite(F);
  i := 0;
  Writeln(F,#12); // Ejeta a página

  //Para avance de líneas comando: ESC d n
   Write(Impresora, #27);// ESC
   Write(Impresora, 'd');// d
   Write(Impresora, #10);// n= número de líneas 

  CloseFile(F);
end;


Se alquem ja fez e puder ajudar agradeço.

Carlos Fernando

Responder a