文档章节

获取、设置文件的时间

vga
 vga
发布于 2015/02/15 10:42
字数 307
阅读 171
收藏 1
点赞 0
评论 0

function CovFileDate(Fd:_FileTime):TDateTime; { 转换文件的时间格式 }
var
  Tct:_SystemTime;
  Temp:_FileTime;
begin
  FileTimeToLocalFileTime(Fd,Temp);
  FileTimeToSystemTime(Temp,Tct);
  CovFileDate:=SystemTimeToDateTime(Tct);
end;
  
procedure GetFileTime(const Tf:string);
  { 获取文件时间,Tf表示目标文件路径和名称 }
const
  Model=yyyy/mm/dd,hh:mm:ss; { 设定时间格式 }
var
  Tp:TSearchRec; { 申明Tp为一个查找记录 }
  T1,T2,T3:string;
begin
  FindFirst(Tf,faAnyFile,Tp); { 查找目标文件 } T1:=FormatDateTime(Model,
  CovFileDate(Tp.FindData.ftCreationTime)));
  { 返回文件的创建时间 }
  T2:=FormatDateTime(Model,
  CovFileDate(Tp.FindData.ftLastWriteTime)));
  { 返回文件的修改时间 }
  T3:=FormatDateTime(Model,Now));
  { 返回文件的当前访问时间 }
  FindClose(Tp);
end;
  
procedure SetFileDateTime(const Tf:string);
  { 设置文件时间,Tf表示目标文件路径和名称 }
var
  Dt1,Dt2:Integer;
  Fs:TFileStream;
  Fct,Flt:TFileTime;
begin
  Dt1:=DateTimeToFileDate(
  Trunc(Form1.DateTimePicker1.Date) + Frac(Form1.DateTimePicker2.Time));
  Dt2:=DateTimeToFileDate(
  Trunc(Form1.DateTimePicker3.Date) + Frac(Form1.DateTimePicker4.Time));
  { 转换用户输入在DataTimePicker中的信息 }
  try
      FS := TFileStream.Create(Tf, fmOpenReadWrite);
  try
  if DosDateTimeToFileTime(LongRec(DT1).Hi, LongRec(DT1).Lo, Fct) and
  LocalFileTimeToFileTime(Fct, Fct) and
  DosDateTimeToFileTime(LongRec(DT2).Hi, LongRec(DT2).Lo, Flt) and
  LocalFileTimeToFileTime(Flt, Flt)
  then SetFileTime(FS.Handle,
  @Fct , @Flt, @Flt);
  { 设置文件时间属性 }
  finally
  FS.Free;
  end;
  except
      MessageDlg(日期修改操作失败!, mtError, [mbOk], 0);
     { 因为目标文件正在被使用等原因而导致失败 }
  end;
end;

© 著作权归作者所有

共有 人打赏支持
vga

vga

粉丝 18
博文 335
码字总数 23381
作品 0
佳木斯
Foundation方法秘籍

2.1.1 rand()函数:产生随机数    2.1.2 abs()函数/labs()函数:整数的绝对值    2.1.3 fabs()/fabsf()/fabsl()函数:浮点数的绝对值    2.1.4 floor()/floorf()/floorl()函数:...

JasonMs ⋅ 2015/09/01 ⋅ 0

android TimePicker

在Android中关于日期时间的类有TimePicker、DatePicker、TimePickerDialog、DatePickerDialog、Calendar。其中TimePickerDialog、DatePickerDialog是对话框形式。 一、TimePicker   查看一...

amigos_wu ⋅ 2012/07/10 ⋅ 2

安卓应用修改系统时间

博客: 安卓之家 微博: 追风917 CSDN: 蒋朋的家 简书: 追风917 前言 通常,我们来获取系统时间来做一些事情,那么,如何设置系统时间呢? 问题抛出来,解决方法也就应运而生了。 解决方法...

jp1017 ⋅ 2016/09/26 ⋅ 0

Mybatis缓存机制理解及配置

Ehcache EHCache是来自sourceforge(http://ehcache.sourceforge.net/)的开源项目,也是纯Java实现的简单、快速的Cache组件。EHCache支持内存和磁盘的缓存,支持LRU、LFU和FIFO多种淘汰算法...

Panshuyang ⋅ 2016/02/23 ⋅ 0

C# 遍历指定文件夹中的所有文件

如何获取指定目录包含的文件和子目录 DirectoryInfo.GetFiles() //获取目录中(不包含子目录)的文件,返回类型为FileInfo[],支持通配符查找; DirectoryInfo.GetDirectories() //获取目录(...

Contac ⋅ 2016/07/25 ⋅ 0

Docker 服务器下java查询时区问题

最近遇到时区问题,着实让人纠结,利用docker部署spring boot 服务(服务器宿主机不是内地的,docker容器为centos7),当部署应用的时候出现了时间少8个钟或者多8个钟的问题...尝试了 jdbc连接的时...

xinaml ⋅ 2017/06/13 ⋅ 0

开始nodejs+express的学习+实践(3)

1.一些常用的api操作 有时候我们可能要获取用户的ip地址和访问时间: 获取ip地址的处理:req.ip 获取访问时间,这时候我们使用Date创建date对象,把时间获取就可以了,同js操作 我们做一个简...

透笔度 ⋅ 2015/12/24 ⋅ 0

iOS10推送通知(本地&远程)/Swift

iOS10本地通知 一.发送一个简单的本地通知 1.注册通知

秦无炎 ⋅ 2016/12/22 ⋅ 0

Android时间选择器

文末提供源码下载地址!!! 效果见图: 对于gif的录制,采用的是LICEcap软件,mac,windows都可以。 对于这个选择器,主要的几个功能的实现: 1. 时间的处理 主要用的是Calendar类,可以方便...

小卒搬砖 ⋅ 2016/10/17 ⋅ 0

input标签获取图片文件尺寸

思路分析 (2)在onchange事件中使用读取选取文件的信息 (3)使用一个img标签来显示获取的图片(如果不需要显示可以设置hidden隐藏) (4)通过img标签的和获取图片的尺寸 效果演示 完整代码...

u013263917 ⋅ 2017/12/02 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

BS与CS的联系与区别【简】

C/S是Client/Server的缩写。服务器通常采用高性能的PC、工作站或小型机,并采用大型数据库系统,如Oracle、Sybase、InFORMix或 SQL Server。客户端需要安装专用的客户端软件。 B/S是Brower/...

anlve ⋅ 38分钟前 ⋅ 0

发生了什么?Linus 又发怒了?

在一个 Linux 内核 4.18-rc1 的 Pull Request 中,开发者 Andy Shevchenko 表示其在对设备属性框架进行更新时,移除了 union 别名,这引发了 Linus 的暴怒。 这一次 Linus Torvalds 发怒的原...

问题终结者 ⋅ 58分钟前 ⋅ 0

在树莓派上搭建一个maven仓库

在树莓派上搭建一个maven仓库 20180618 lambo init 项目说明 家里有台树莓派性能太慢。想搭建一个maven私服, 使用nexus或者 jfrog-artifactory 运行的够呛。怎么办呢,手写一个吧.所在这个...

林小宝 ⋅ 今天 ⋅ 0

Spring发展历程总结

转自与 https://www.cnblogs.com/RunForLove/p/4641672.html 目前很多公司的架构,从Struts2迁移到了SpringMVC。你有想过为什么不使用Servlet+JSP来构建Java web项目,而是采用SpringMVC呢?...

onedotdot ⋅ 今天 ⋅ 0

Python模块/包/库安装(6种方法)

Python模块/包/库安装(6种方法) 冰颖机器人 2016-11-29 21:33:26 一、方法1: 单文件模块 直接把文件拷贝到 $python_dir/Lib 二、方法2: 多文件模块,带setup.py 下载模块包(压缩文件zip...

cswangyx ⋅ 今天 ⋅ 0

零基础学习大数据人工智能,学习路线篇!系统规划大数据之路?

大数据处理技术怎么学习呢?首先我们要学习Python语言和Linux操作系统,这两个是学习大数据的基础,学习的顺序不分前后。 Python:Python 的排名从去年开始就借助人工智能持续上升,现在它已经...

董黎明 ⋅ 今天 ⋅ 0

openJdk和sun jdk的区别

使用过LINUX的人都应该知道,在大多数LINUX发行版本里,内置或者通过软件源安装JDK的话,都是安装的OpenJDK, 那么到底什么是OpenJDK,它与SUN JDK有什么关系和区别呢? 历史上的原因是,Ope...

jason_kiss ⋅ 今天 ⋅ 0

梳理

Redux 是 JavaScript 状态容器,提供可预测化的状态管理。 它是JS的状态容器,是一种解决问题的方式,所以即可以用于 react 也可以用于 vue。 需要理解其思想及实现方式。 应用中所有的 stat...

分秒 ⋅ 今天 ⋅ 0

Java 后台判断是否为ajax请求

/** * 是否是Ajax请求 * @param request * @return */public static boolean isAjax(ServletRequest request){return "XMLHttpRequest".equalsIgnoreCase(((HttpServletReques......

JavaSon712 ⋅ 今天 ⋅ 0

Redis 单线程 为何却需要事务处理并发问题

Redis是单线程处理,也就是命令会顺序执行。那么为什么会存在并发问题呢? 个人理解是,虽然redis是单线程,但是可以同时有多个客户端访问,每个客户端会有 一个线程。客户端访问之间存在竞争...

码代码的小司机 ⋅ 今天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部