Delphi: Forçar criação de Diretório

Delphi: Forçar criação de Diretório

 

    if not DirectoryExists(ExtractFilePath(Application.ExeName) + ‘/teste’) then

      ForceDirectories(ExtractFilePath(Application.ExeName) + ‘/teste’);

 

Você pode gostar...

Deixe um comentário

O seu endereço de e-mail não será publicado.