[Jad]

Hola a todos,

Hace ya mucho tiempo que dejé de entrar al foro y programar en Delphi, pero la sangre llama de nuevo. Estoy volviendo a retomar la programación con Delphi 11, lo que quiero hacer es leer los nombres de los archivos de una carpeta y poner esos nombres en un memo.

Por ejemplo, digamos que en la carpeta c:\prog\sistemas están los siguientes archivos:

Compras.pdf
Presupuestos.xls
Nomina.dbf
etc.

Esos mismos nombres de archivos son los que quiero que el memo tenga. La idea es agregarle un número de folio consecutivo a cada archivo y luego renombrarlo. Al finalizar los archivos de esa carpeta se verán así:

Compras-1.pdf
Presupuestos-2.xls
Nomina-3.dbf
etc.

Todavía recuerdo muchas instrucciones de Delphi, cualquier ayuda será bien recibida.

Gracias por la atención!