Impress�o em LX para bobina de 80 colunas

Question

Ola, preciso urgentimente saber como eu fa�o para configurar a impress�o de um cupom/ingresso, no Delphi 5, usando uma LX em bobinas de 80 colunas. Preciso muito de ajuda, desde ja agradeco.
Fabio

Mario_limoeiro · Answer

procedure Imprimir80Colunas();Var A:TextFile;begin       AssignFile(A,�LPT1�);       Rewrite(A);       Writeln(A,�o seu texto no Bilhete de passagem�);        Writeln(A,�o seu texto no Bilhete de passagem�);      //No final vc finaliza o envio para impressora ;      closeFile(A); end; Um Abra�o .....

Ulissesn · Answer

Tch�.....

J� ouvistes falar do m�todo AssignFile para abrir arquivos, use o mesmo s� que trocando algumas coordenadas:

var

F: TextFile;
S: string;
begin
AssignFile(F,�LPT1�); { Porta da Impressora}
Writeln(F, S); { Escreve a linha que deseja, Onde �S� tem o conte�do que deseja escrever.... }
CloseFile(F);
end;

Espero ter ajudado
Ulisses

F�rum Impress�o em LX para bobina de 80 colunas #223990