Fórum Como imprimir o conteudo do ListBox ? #298748

07/10/2005

0

Delphi

Tenho um arquivo texto que é exibido em um ListBox, e gostaria de imprimir este conteudo em impressora matricial

Se alguem puder me dar uma ajuda, aceito sujestões .


Fabiano Góes

Fabiano Góes

Responder

Posts

10/10/2005

Guilherme 

procedure TForm1.Button1Click(Sender: TObject);
var
  f : TextFile;
  i: integer;
begin
 AssignFile(f,´LPT1´);
 Rewrite(f);
 for i := 0 to ListBox1.Count -1 do
 Writeln(f, listbox1.Items[i]);
 Writeln(f,12);
 f.Close;
 f.Free;
end;



Responder

Gostei + 0

10/10/2005

Fabiano Góes

Valeu Guilherme !!!

Muito obrigado pela dica !!


Responder

Gostei + 0

10/10/2005

Guilherme

Mais deu certo ?



tem uma coisa errada cara é ki fiz de cabeça
vc tira as 2 linha f.close e f.free e coloca closefile(f). so isso ki tava errado !!!


Responder

Gostei + 0

10/10/2005

Fabiano Góes

Guilherme, ainda não testei
mais de qualquer forma já lhe agradeço pela atenção,
vou corrigir o codigo.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar