delphi recursion mkdir

¿Cómo puedo crear carpetas recursivamente en Delphi?



recursion mkdir (1)

Utilizar

ForceDirectories(''C:/TestFolder/Another/AndAnother'');

(Esta es una función RTL estándar, que se encuentra en SysUtils.pas. Por lo tanto, no es necesario que cree su propia función, aunque eso no hubiera sido difícil).

Necesita ayuda para crear una función que pueda crear carpetas recursivamente con la ruta de acceso:

C:/TestFolder/Another/AndAnother

Función Delki MkDir devolviendo IOerror = 3.

MkDir(''C:/TestFolder/Another/AndAnother'');