Como listar los archivos de un determinado directorio al dar click en un boton?

[Missael]

Podría implementar ese código en un botón? si es así, podrían explicarme como?, soy nuevo en delphi, se los agradecería mucho.

también tengo la duda de como usar un procedure con parámetros dentro de otro procedure. como para ejecutar el procedure y ahorrar lineas de código de mas.