一句话复制整个文件夹(当然包括嵌套文件夹) - 回复 "张哆哆" 的问题
摘要:问题来源: http://www.cnblogs.com/del/archive/2009/10/16/1584660.html#1742606使用的是 Delphi 2010 下 IOUtils 单元的 TDirectory.Copy 函数:uses IOUtils;procedure TForm1.Button1Click(Sender: TObject);const SourceDir =...
阅读全文
posted @
2010-01-08 12:24
万一
阅读(10474)
推荐(0) 编辑
几个和当前路径相关的新函数
摘要:偶然从 SysUtils 里发现了几个路径相关的函数, 以前没见过, 可能是 2010 新增的:GetLocaleDirectory();GetLocaleFile();LocaleDirectoryExists();LocaleFileExists();应用测试:uses IOUtils;procedure TForm1.FormCreate(Sender: TObject);var p,f:...
阅读全文
posted @
2009-11-02 01:00
万一
阅读(6805)
推荐(1) 编辑
Delphi 2010 新增功能之: IOUtils 单元(7): TFile 结构的功能
摘要:IOUtils 单元主要就是三个结构: TDirectory、TPath、TFile, 很有用; 下面是 TFile 的功能简介.TFile.Exists();//判断指定的文件是否存在TFile.Copy();//复制文件var source,dest: string;begin TFile.Copy(source, dest); {不允许覆盖同名的文件} TFile.Copy(sourc...
阅读全文
posted @
2009-10-18 22:19
万一
阅读(11714)
推荐(0) 编辑
Delphi 2010 新增功能之: IOUtils 单元(6): TPath(结构体) 的方法与属性
摘要:以后路径相关的处理, 用 IOUtils.TPath 就很方便了.//较常用的方法:TPath.GetTempPath; {获取临时文件夹路径}TPath.GetTempFileName; {获取一个临时文件名}TPath.GetPathRoot(); {提取盘符, 如: c:\}TPath.GetDirectoryName(); {提取路径}TPath.GetFileName(); {提取文件名...
阅读全文
posted @
2009-10-17 20:48
万一
阅读(9109)
推荐(0) 编辑
Delphi 2010 新增功能之: IOUtils 单元(5): TDirectory 的其他功能
摘要:TDirectory.CreateDirectory(); {建立新目录}TDirectory.Exists(); {判断文件夹是否存在}TDirectory.IsEmpty(); {判断文件夹是否为空}TDirectory.Copy(); {复制文件夹}TDirectory.Move(); {移动文件夹}TDirectory.Delete(); {删除文件夹, 第二个参数为 True 可删除非空...
阅读全文
posted @
2009-10-17 00:19
万一
阅读(7836)
推荐(0) 编辑
Delphi 2010 新增功能之: IOUtils 单元(4): TDirectory.GetDirectories
摘要:和 TDirectory.GetFiles 用法一样, TDirectory.GetDirectories 是用来获取子目录的.另外还有 TDirectory.GetFileSystemEntries 可同时获取文件与子目录, 用法都一样.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphi...
阅读全文
posted @
2009-10-16 21:17
万一
阅读(6122)
推荐(0) 编辑
Delphi 2010 新增功能之: IOUtils 单元(3): TDirectory.GetFiles 支持通配符
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; Button2: TButton; pr...
阅读全文
posted @
2009-10-16 20:55
万一
阅读(6016)
推荐(1) 编辑
Delphi 2010 新增功能之: IOUtils 单元(2): TDirectory.TFilterPredicate
摘要:TDirectory.GetFiles 函数还有一个 TDirectory.TFilterPredicate 类型的参数, 这是个匿名函数类型, 可对搜索结果再处理.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtr...
阅读全文
posted @
2009-10-16 18:20
万一
阅读(5379)
推荐(0) 编辑
Delphi 2010 新增功能之: IOUtils 单元(1): 初识 TDirectory.GetFiles
摘要:用 IOUtils 单元下的 TDirectory.GetFiles 获取文件列表太方便了;下面的例子只是 TDirectory.GetFiles 的典型应用...unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrl...
阅读全文
posted @
2009-10-16 17:08
万一
阅读(10636)
推荐(0) 编辑
把 Integer 数组保存到文件、并读取
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton...
阅读全文
posted @
2009-04-14 20:40
万一
阅读(4562)
推荐(0) 编辑
通过 SHGetSpecialFolderLocation、SHGetPathFromIDList 函数获取常用路径
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; proce...
阅读全文
posted @
2008-09-23 17:54
万一
阅读(12407)
推荐(0) 编辑
复杂的结构化存取(三) : 存取函数
摘要:今天写了四个小函数, 拿来与大家共享: Dir2Doc: 把文件夹下的所有文件(不包括子文件夹)保存成一个复合文件; Doc2Dir: Dir2Doc 的反操作; ZipDir2Doc: 同 Dir2Doc, 只是同时执行了压缩; UnZipDoc2Dir: ZipDir2Doc 的反操作. 函数及测试代码(分别在 Delphi 2007 和 Delphi 2009 下测试通过): ...
阅读全文
posted @
2008-08-25 22:44
万一
阅读(6101)
推荐(0) 编辑
复杂的结构化存取(二)
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; B...
阅读全文
posted @
2008-07-27 23:55
万一
阅读(5835)
推荐(0) 编辑
复杂的结构化存取(一)
摘要:之所以说复杂, 就是区别与以前谈到的 结构化文件存取; 这种复杂的结构化文件也有叫做"复合文档". 有些文档不是结构化的, 譬如记事本文件; 结构化的档可以分为以下几类: 标准结构化文档、自定义结构化文档(譬如 bmp 文件)和复合文档. 这里要谈到的结构化储存(复合文档)是由 Windows 系统通过 COM 提供的, 它能完成像 Windows 目录结构一样复杂的文件结构的存取; 提示一下...
阅读全文
posted @
2008-07-27 10:01
万一
阅读(11024)
推荐(2) 编辑
WinAPI: WritePrivateProfileString、GetPrivateProfileString - 简单读写 Ini 文件
摘要:尽管使用 TIniFile 类很方便, 但我觉得还是用系统 API 操作更顺手, 读写各只需要一行代码, 也不用 uses IniFiles. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dial...
阅读全文
posted @
2008-06-02 13:48
万一
阅读(7401)
推荐(0) 编辑
无类型文件读写
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; ...
阅读全文
posted @
2007-12-20 15:53
万一
阅读(7952)
推荐(1) 编辑
结构化文件存取
摘要:纲要: AssignFile: 关联 Rewrite: 创建并打开一个新文件, 如已存在则覆盖 Reset: 打开已存在的文件; 追加也要用它先打开, 然后再移动指针; Append 是文本文件专用的 CloseFile: 关闭 FileSize: 记录数 FilePos: 返回文件的当前位置 Seek: 把文件指针移到指定位置(只用于结构化文件) Eof: 文件尾 Read:...
阅读全文
posted @
2007-12-19 14:22
万一
阅读(7486)
推荐(0) 编辑
文本文件读写
摘要:前言: Delphi 支持三种文件类型: 文本文件、记录文件、无类型文件。 文本文件是以行为单位进行读、写的。由于每一行的长度不一定相同,不能计算出给定行在文件中的确切位置,因而只能顺序地读写。 文本文件只能单独为读或写而打开,在一个打开的文本文件上同时进行读、写操作是不允许的。 文本文件的打开需要两个步骤:1.文件变量与文件名关联;2.初始化读写。 1.文件变量与文件名关联: Ass...
阅读全文
posted @
2007-12-19 12:06
万一
阅读(15549)
推荐(0) 编辑
ini 文件操作记要(2): 使用 TMemIniFile
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton...
阅读全文
posted @
2007-12-18 10:18
万一
阅读(7511)
推荐(0) 编辑
ini 文件操作记要(1): 使用 TIniFile
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ...
阅读全文
posted @
2007-12-17 22:48
万一
阅读(23349)
推荐(4) 编辑