Question

delphi怎么创建以当前日期命名的文件夹

比如，我要在c盘下面创建一个以当前日期20141020为名字的文件夹（哪天创建就以当天的日期命名），怎么做？谢谢

Answer 1

CreateDirectory( PChar( 'C:\' + FormatDateTime( 'yyyymmdd', Now ) );

Answer 2

var dir:string;

dir:='c:\'+formatdatetime('yyyymmdd', now());
if (not DirectoryExists(dir)) then CreateDir(dir);

Answer 3

MkDir('C:\'+FormatDateTime('yyyymmdd',now));