Como listar todos arquivos de um diretório em Delphi?

Fala galera do Show Delphi, tudo beleza? Aqui quem fala é Giovani e vamos a mais uma interessante dica de Delphi.

Muitas vezes precisamos recuperar todos arquivos de estão dentro de determinada pasta e como podemos fazer isso de modo simples e prático?

Você pode usar tdirectory.getfiles, sendo que  primeiro é necessário adicionar ioutils.pas na seção uses.

Bem, vamos ao código!

uses IOUtils;
 
// ...
 
var
  path : string;
begin
    for Path in TDirectory.GetFiles(OpenPictureDialog1.filename)  do
        Listbox1.Items.Add(Path); {assumindo que OpenPictureDialog1 é o nome do seu componente OpenPictureDialog}
end;

Lembrando que é código é válido para versões do Delphi 2010 ou mais recente.

Fonte: https://stackoverflow.com/questions/3027561/delphi-how-to-get-a-list-of-all-files-of-directory

Beleza pessoal? Espero que tenham gostado.

Como sugestão deixo o link do blog Giovani Da Cruz, para quem quiser aprender ainda mais.

Dúvidas ou sugestões? Deixe o seu comentário!

Um abraço e até o próximo post. Valeu!