2011/3/15 William Oliveira Ferreira <[email protected]>: > 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 <[email protected]> >> >> 2011/3/15 Peter Williams <[email protected]>: >> (...) >> 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 [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
