Fórum Impressao direto para LPT1 de todos registros da tabela #278379
21/04/2005
0
Ola, gostaria de saber como imprimir todos os registros de uma tabela, usando o comando ´writeln´ diretamente para porta LPT1, pois so consigo imprimir 1.
Obrigado
Obrigado
Viptech
Curtir tópico
+ 0
Responder
Posts
21/04/2005
Edilcimar
faça um loop da tabela
while not tableX.eof do
begin
texto := campodesejado;
writeln(arquivo,texto);
next;
end;
while not tableX.eof do
begin
texto := campodesejado;
writeln(arquivo,texto);
next;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)