como verificar se um diretorio existe ?

Delphi

20/06/2006

alguem ae sabe como faço pra verificar se um diretorio existe?
e se esse diretorio nao existir. criá-lo?


Salsa

Salsa

Curtidas 0

Respostas

Paullsoftware

Paullsoftware

20/06/2006

vc pode tentar assim:
if not DirectoryExists(Caminho_Nome_Diretorio) then
 CreateDirectory(Caminho_Nome_Diretorio)


espero ter ajudado! :wink:


GOSTEI 0
Misael

Misael

20/06/2006

[b:f1b7b4a8a6]Verificar se um diretório existe
Inclua na seção uses: FileCtrl, Dialogs [/b:f1b7b4a8a6]
if DirectoryExists(´C:\MEUSDOCS´) then
  ShowMessage(´O diretório existe´)
else
  ShowMessage(´O diretório não existe´);


[b:f1b7b4a8a6] Verificar se um arquivo existe
Inclua na seção uses: SysUtils, Dialogs [/b:f1b7b4a8a6]
if FileExists(´c:\carta.doc´) then
  ShowMessage(´O arquivo existe´)
else
  ShowMessage(´O arquivo não existe´)


ou se preferir[url]https://www.devmedia.com.br/visualizacomponente.aspx?comp=868&site=3[/url]


GOSTEI 0
Salsa

Salsa

20/06/2006

valeu povo ;)


GOSTEI 0
POSTAR