QUOTE
E como faz esse por linha? não entendi muito bem.
Voce pode usar qalquer linguagem de programação para fazer isso: Ex: VB , Delphi, Clipper ...etc
Em VB ficaria assim:
CODE
Open "LPT1" For Output As #1
Print #1, "EMPRESA"
'pula uma linha
Print #1,
Print #1, "TEXTO1"
Print #1, "TEXTO2"
Print #1, "TEXTO3"
'pula 2 linhas
Print #1,
Print #1,
CLOSE #1
Em delphi ficaria assim:
CODE
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;
em Clipper ficaria assim:
CODE
SET PRINT TO [LPT1 | LPT2 | \\MICRO2\EPSON ]
SET CONSOLE OFF
SET DEVICE TO PRINT
SET PRINT ON
(relatório)
SET PRINT OFF
SET DEVICE TO SCREEN
SET CONSOLE ON
SET PRINT TO
FUNCIONA COM TODAS AS IMPRESSORAS EM LPT1
--------------------------------------------------------------------------------
QUOTE
eu li algo sobre desabilitar o avanço automático, mas eu não encontrei onde eu faço isso.
Tente desabilitar o salto automatico de pagina da impressora (opção tear on/off)
abraço