Interestingly, this detail about ForceDirectory I did not know ________________________________ William de Oliveira Ferreira Bacharel em Sistemas de Informação
2011/3/15 silvioprog <[email protected]> > 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://code.google.com/p/lazsolutionsLazarus-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 >
-- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
