4Each - Blog Blog

0

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’);