2013年12月29日
正则PerlRegEx实现的批量替换指定文件中的标签
摘要： 示例：一个朋友需要而编写的标签升级更新。速度超快，1w个文件大概4,5秒，本想加个多线程显示进度，后来想想算了主要代码： reg.RegEx := ''; reg.Replacement := ''; reg.Subject := strList.Text; reg.ReplaceAll; reg.RegEx := ''; reg.Replacement := ''; reg.ReplaceAll; 阅读全文
posted @ 2013-12-29 16:38 oszhouzhb 阅读(485) 评论(2) 推荐(0)
TDirectory.GetCreationTime、TDirectory.SetCreationTime获取和设置文件夹创建时间
摘要： 使用函数： System.IOUtils.TDirectory.GetCreationTime//获取创建时间 System.IOUtils.TDirectory.SetCreationTime//设置创建时间 注：UTC结尾的返回 。示例：代码unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls... 阅读全文
posted @ 2013-12-29 16:00 oszhouzhb 阅读(477) 评论(0) 推荐(0)
TDirectory.GetAttributes、TDirectory.SetAttributes获取和设置文件夹属性
摘要： 使用函数： System.IOUtils.TDirectory.GetAttributes//获取属性 System.IOUtils.TDirectory.SetAttributes//设置属性注：次例未添加异常处理。补充一句代码：CheckListBox1.CheckAll(vcl.StdCtrls.TCheckBoxState(0), False, False);//ListCheckBox取消所有选中示例：代码：unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Va... 阅读全文
posted @ 2013-12-29 14:45 oszhouzhb 阅读(456) 评论(0) 推荐(0)
TDirectory.Delete 创建删除目录简单示例
摘要： 使用函数： 1.System.IOUtils.TDirectory.CreateDirectory//创建目录 2.System.IOUtils.TDirectory.Exists //目录是否存在 3.System.IOUtils.TDirectory.Delete //删除目录示例：代码：unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Cont... 阅读全文
posted @ 2013-12-29 12:56 oszhouzhb 阅读(700) 评论(0) 推荐(0)