carregar dados de uma pasta em listbox e exportar p txt xls

Question

ol� agaleracomo fa�o para carrgar os dados de uma pasta para um list box e em seguida exportar esse dados para um arquivo txt ou xlsdesde j� agrade�o,Adriano....

Woinch · Answer

Tem como ser mais especifico?Obrigado....

Xadriano · Answer

exemplificando:tenho uma pasta com 5 arquivo:arquivo1arquivo2arquivo3arquivo4arquivo5quero listar o nome de todos o arquivo no listbox, ou seja, aparecer no listbox:arquivo1arquivo2arquivo3arquivo4arquivo5em seguida: exportar os dados que estao no listbox para excel ou arquivo texto...

Woinch · Answer

Listar os arquivos de uma pasta:[code:1:2096b8deea]procedure TForm1.Button1Click(Sender: TObject);var  SR: TSearchRec;  I: integer;begin  I := FindFirst(�C:Caminho*.*�, faAnyFile, SR);  while I = 0 do  begin    if (SR.Attr and faDirectory) <> faDirectory then      ListBox1.Items.Add(SR.Name);    I := FindNext(SR);  endend;[/code:1:2096b8deea]Salvar em arquivo texto:[code:1:2096b8deea]procedure TForm1.btn2Click(Sender: TObject);begin  ListBox1.Items.SaveToFile(�C:CaminhoNome_do_arquivo.txt�);end;[/code:1:2096b8deea]Espero ter ajudado....

Xadriano · Answer

ajudou e muito, era exatamente isso que eu estava precisandovalez�o Woinch....

Woinch · Answer

As ordens! ;)...

F�rum carregar dados de uma pasta em listbox e exportar p txt xls #371349