Código Delphi [-] CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));
CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));