Как я могу создавать папки рекурсивно в Delphi?

Question

Нужна помощь в создании функции, которая может рекурсивно создавать папки с указанием пути:

C:\TestFolder\Another\AndAnother

Функция Delphi MkDir, возвращающая IOerror = 3.

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

Answer 1

Используйте

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

(Это стандартная функция RTL, найденная в SysUtils.pas. Следовательно, вам не нужно создавать свою собственную функцию, даже если бы это не было сложно.)