[Lazarus] How to create a directory from a path string? (cross-platform needed).

[silvioprog]

2011/3/15 William Oliveira Ferreira <bdexterholland at 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 <silvioprog at gmail.com>
>>
>> 2011/3/15 Peter Williams <pewilliams2010 at 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
=================================================