Como criar um Diretório????

Delphi

28/01/2005

Olá!

Gostaria de saber o código para criar um diretório(pasta) através do delphi.

Agradeço desde já.


Roswel

Roswel

Curtidas 0

Respostas

Massuda

Massuda

28/01/2005

Use a função [b:c02a5b6a2d]MkDir[/b:c02a5b6a2d] ou a função [b:c02a5b6a2d]ForceDirectories[/b:c02a5b6a2d] da unit FileCtrl.

A diferença entre as duas é que para criar o diretório c:\minha\pasta, MkDir exige que o diretório c:\minha já exista, enquanto ForceDirectories irá criar todos os diretórios que forem necessários.


GOSTEI 0
Marcio.theis

Marcio.theis

28/01/2005

Eu utilizo da seguinte forma:


diretorio:=Copy(Application.ExeName,1,LastDelimiter(´\´,Application.ExeName))+´Arquivo\´;
            if not DirectoryExists(diretorio) then
                MkDir(diretorio);


carrego para a variável diretorio o caminho desejado e depois verifico se existe, caso não exista, eu o crio através do caminho MkDir.


GOSTEI 0
Roswel

Roswel

28/01/2005

Obrigado pelas dicas, era isso mesmo que eu precisava!
Valew!!! :D


GOSTEI 0
POSTAR