随笔分类 -  Delphi-File1

摘要:1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 阅读全文
posted @ 2019-01-15 19:21 findumars 阅读(734) 评论(0) 推荐(0) 编辑
摘要:PathRemoveFileSpec 函数的作用:将路径末尾的文件名和反斜杠去掉。 例如,我们想获取EXE文件自身所在的文件夹,可以这样: [cpp] view plain copy #include <stdio.h> #include <Shlwapi.h> #pragma comment(li 阅读全文
posted @ 2018-04-07 07:31 findumars 阅读(1446) 评论(0) 推荐(0) 编辑
摘要:[cpp] view plain copy print? [cpp] view plain copy print? http://blog.csdn.net/microzone/article/details/49883783 阅读全文
posted @ 2018-01-18 00:48 findumars 阅读(1344) 评论(0) 推荐(0) 编辑
摘要:Stream对象,又称流式对象,是TStream、THandleStream、TFileStream、TMemoryStream、TResourceStream和TBlobStream等的统称。它们分别代表了在各种媒介上存储数据的能力,它们将各种数据类型(包括对象和部件) 在内存、外存和数据库字段中 阅读全文
posted @ 2018-01-16 22:26 findumars 编辑
摘要:1 2 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 1 2 1 2 1 2 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 参考:http://www.cnblogs.com/del/archive/200 阅读全文
posted @ 2018-01-05 23:05 findumars 阅读(781) 评论(0) 推荐(0) 编辑
摘要:最近在写的程序与SOAP相关,所以用到了一些Base64编码/解码及数据压缩/解压方面的知识. 在这里来作一些总结: 一.Base64编码/解码 一般用到的是Delphi自带的单元EncdDecd,当然还有第三方提供的单元或控件,其中我所接触到的认为比较好的有Indy的TIdMimeEncode / 阅读全文
posted @ 2018-01-05 22:02 findumars 阅读(1753) 评论(0) 推荐(0) 编辑
摘要:此函数可以快速获取文件大小,即使文件已经被其它程序锁定。 http://www.cnblogs.com/yangyxd/p/7602402.html 阅读全文
posted @ 2017-11-15 22:00 findumars 阅读(1315) 评论(0) 推荐(0) 编辑
摘要:最近需要在Windows下拷贝大量小文件(数量在十万级别以上)。写了些拷贝文件的小程序,竟然发现不同的选择,拷贝的速度有天壤之别! 现有这样的测试数据:1500+小文件,总大小10M左右。现用不同方法进行拷贝。: 方案1:调用SHFileOperation [cpp] view plain copy 阅读全文
posted @ 2017-07-28 21:54 findumars 阅读(1042) 评论(0) 推荐(0) 编辑
摘要:1. AssignFile、Erase AssignFile procedure AssignFile(var F; FileName: string);:给文件变量连接一个外部文件名。这里需要注意的是AssignFile不能用在已打开的文件上。 procedure TForm1.Button1Cl 阅读全文
posted @ 2017-07-10 21:07 findumars 阅读(3861) 评论(0) 推荐(0) 编辑
摘要:The following are the Windows API (and former DOS) IO errors, which are also the IO errors often returned by Delphi programs, and which are generally 阅读全文
posted @ 2017-07-10 20:51 findumars 阅读(2973) 评论(0) 推荐(0) 编辑
摘要:软件大多都要对文件、磁盘进行操作。熟悉掌握这些函数可以帮助你轻松实现创建、删除、保存文件等功能。 1.Append 功能说明:追加内容到文件中。文件必须要存在。 参考实例: var S: String; F: TextFile; begin S := 'This is a book.'; Assig 阅读全文
posted @ 2017-07-06 18:52 findumars 阅读(592) 评论(0) 推荐(0) 编辑
摘要:delphi资源文件的使用 delphi资源文件的使用 资源文件(*.res)通过编译指令 $R 关联, 譬如工程文件 Project1 中的 {$R *.res} 就是关联 Project1.res 资源文件, 我们直接写作 {$R Project1.res} 不会有问题(但如果工程文件改名时, 阅读全文
posted @ 2017-07-04 15:58 findumars 阅读(773) 评论(0) 推荐(0) 编辑
摘要:http://blog.csdn.net/genispan/article/details/10004487 阅读全文
posted @ 2017-07-04 15:47 findumars 阅读(366) 评论(0) 推荐(0) 编辑
摘要:Delphi中默认有input和output两个文件变量,使用可以不用定义,直接使用. 但: input:只读、output:只写。用时注意以免引起异常. 文件是由文件名标识的一组数据的集合,文件通常存放在磁盘上。源程序、学生档案记录、图形、音乐等均可以作为文件存储在磁盘上。操作系统是以文件为单位对 阅读全文
posted @ 2017-06-21 23:22 findumars 阅读(7427) 评论(0) 推荐(0) 编辑
摘要:function ListFiles(path: string): TStringList;var SearchRec: TSearchRec; found: integer;begin result := TStringList.Create; found := FindFirst(path + 阅读全文
posted @ 2017-05-20 03:07 findumars 阅读(1807) 评论(0) 推荐(0) 编辑
摘要:Delphi的流对象(TStream的派生对象)有如下读写函数: function Read(var Buffer; Count: Longint): Longint;function Write(const Buffer; Count: Longint): Longint;procedure Re 阅读全文
posted @ 2017-05-16 21:09 findumars 阅读(315) 评论(0) 推荐(0) 编辑
摘要:比较“流行”的说法是:“16位的Delphi 1.0和32位的Delphi2.0、3.0都提供了资源 编译工具,其中 Delphi 1.0的资源编译器叫BRCC.EXE,Delphi 2.0的资源编译器 叫BRCC32.EXE 用来编译32位资源,所有资源编译器都只提供了命令行版本, 没有提供Win 阅读全文
posted @ 2017-05-16 21:03 findumars 阅读(863) 评论(0) 推荐(0) 编辑
摘要:一、引子:现在的Windows应用程序几乎都使用图标、图片、光标、声音等,我们称它们为资源(Resource)。最简单的使用资源的办法是把这些资源的源文件打入软件包,以方便程序需要的时候调用。资源是程序的一部分,程序要正常运行就离不了资源文件。但是它是不可执行代码。为了更好地管理资源,Delphi中 阅读全文
posted @ 2017-04-14 23:46 findumars 阅读(1728) 评论(0) 推荐(0) 编辑
摘要:Easy Compression Library is a very easy-to-use replacement of TFileStream, TMemoryStream and other TStream descendants to their analogues with compres 阅读全文
posted @ 2017-04-08 20:12 findumars 阅读(381) 评论(0) 推荐(0) 编辑
摘要:With new users purchasing Delphi every single day, it’s not uncommon for me to meet users that are new to the Object Pascal language. One such new use 阅读全文
posted @ 2017-04-07 21:28 findumars 阅读(316) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示