Delphi -修改文件夹的修改、创建日期 (Delphi7 /D2010 区别)
2012-07-27 15:14
246 查看
Delphi7: Uses:ShellAPI; procedure SetFileDateTime(FileName: string;dtDate:TDateTime); var hFile:THandle; ModifyTime:SYSTEMTIME; ModifyFileTime,UpdateFileTime:FILETIME; sDateTime:String; begin hFile:=CreateFile(pChar(FileName),GENERIC_WRITE,FILE_SHARE_READ,nil,OPEN_EXISTING,FILE_FLAG_BACKUP_SEMANTICS,0); If hFile = INVALID_HANDLE_VALUE Then begin Exit; end; DateTimeToSystemTime(dtDate,ModifyTime); //将日期转换为系统时间SYSTEMTIME 类型。 SystemTimeToFileTime(ModifyTime,ModifyFileTime); //将系统时间转换为文件时间 LocalFileTimeToFileTime(ModifyFileTime,UpdateFileTime); //转换本地日期。 SetFileTime(hFile,@UpdateFileTime,@UpdateFileTime,@UpdateFileTime); //修改文件时间。第一个为:CreateTime,第二个为:最后访问时间 LastAccessTime, 第三个为:最后修改时间 LastModifyTime. CloseHandle(hFile); end;
相关文章推荐
- Delphi中取得和设置硬盘上文件的创建日期、修改日期、访问日期、文件属性
- C#编写小系统 打开指定的文件夹后,第一眼看到的文件夹的名字,创建日期,最后修改日期
- Delphi获取Excel文档创建、修改、访问的日期和时间
- C# 文件操作(全部) 追加、拷贝、删除、移动文件、创建目录 修改文件名、文件夹名
- delphi2010 "名,伍,上"等字不显示的修改
- 用批处理实现的创建带日期的文件夹的代码
- 查看文档创建日期、修改日期和文档大小
- CMD创建当前日期文件夹
- 批处理--以当前日期创建文件夹
- delphi 删除目录和创建目录,临时文件夹
- linux下根据日期创建文件或者文件夹
- 批处理--创建当前日期的文件夹
- JS简单实现查看文档创建日期、修改日期和文档大小的方法示例
- SQL表和存储过程创建修改日期
- SQL表和存储过程创建修改日期
- 让delphi2010能有delphi7的版面布局
- C# 文件操作(全部) 追加、拷贝、删除、移动文件、创建目录 修改文件名、文件夹名
- TurboPower Async Professional 在Delphi2010及Delphi7中的安装
- Delphi7升级到Delphi 2010、Delphi XE、Delphi XE2总结 .