2011/3/15 William Oliveira Ferreira <bdexterholl...@gmail.com>: > Could Try this one? > http://www.freepascal.org/docs-html/rtl/sysutils/createdir.html > ________________________________ > William de Oliveira Ferreira > Bacharel em Sistemas de Informação
CreateDir does not create recursive path. > 2011/3/15 silvioprog <silviop...@gmail.com> >> >> 2011/3/15 Peter Williams <pewilliams2...@live.com>: >> (...) >> var >> Str1 : string; >> begin >> Str1 := GetAppConfigDir(False); >> if not DirectoryExists(Str1) then >> ForceDirectory(Str1); >> (...) >> >> Good luck. ;) -- Silvio Clécio ================================================= Blog - silvioprog.com.br Twitter - twitter.com/silvioprog LazSolutions - code.google.com/p/lazsolutions Lazarus-BR - http://groups.google.com.br/group/lazarus-br?hl=pt-BR ================================================= -- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus