Impressora Matricial

Delphi

10/04/2003

Olá pessoal,
Tenho que imprimir uns dados em um formulario zebrado de 62 ou 63 linhas sei lá, numa matricial LX 300. Ok mando imprimir tudo blz mas quando chega no meio da página os items começam a sair da linha.

Existe alguma solução para corrigir isso?

Desde já agradeço.

Marcelo Pomarolli


Anonymous

Anonymous

Curtidas 0

Respostas

Dluca

Dluca

10/04/2003

Prezado Amigo.

Adquira os componentes da deltress (www.deltress.com.br)
rdprint, e esqueça problema de impressão


GOSTEI 0
Denis

Denis

10/04/2003

Olá pessoal, Tenho que imprimir uns dados em um formulario zebrado de 62 ou 63 linhas sei lá, numa matricial LX 300. Ok mando imprimir tudo blz mas quando chega no meio da página os items começam a sair da linha. Existe alguma solução para corrigir isso? Desde já agradeço. Marcelo Pomarolli


Faça como no exemplo abaixo. Não precisa de componente e é facinho.

-------------

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,#15+´Teste de Impressão - Linha 2´);
Writeln(F,´Teste de impressao - Linha 3´);
Writeln(F,18+´Teste de Impressão - Linha 4´);
Writeln(F,´Teste de impressao - Linha 5´);
Writeln(F,#12); // Ejeta a página
CloseFile(F);
end;


GOSTEI 0
POSTAR