delphi 如何创建以系统时间命名的文件夹 10
展开全部
var
st : TSystemTime;
begin
GetLocalTime(st);
CreateDir(Format(
'C:\%d年%d月%d日 %d时%d分%d秒%d毫秒',[
st.wYear,
st.wMonth,
st.wDay,
st.wHour,
st.wMinute,
st.wSecond,
st.wMilliseconds]));
end;
默认在C盘根目录下建立,时间格式可以自己改。
st : TSystemTime;
begin
GetLocalTime(st);
CreateDir(Format(
'C:\%d年%d月%d日 %d时%d分%d秒%d毫秒',[
st.wYear,
st.wMonth,
st.wDay,
st.wHour,
st.wMinute,
st.wSecond,
st.wMilliseconds]));
end;
默认在C盘根目录下建立,时间格式可以自己改。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
手动改
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询