频道分类
您的位置:网站首页 > 文件

Delphi 判断是否为二进制文件

functionIsDFMBinary(FileName:string):Boolean;varF:TFileStream;B:Byte;beginB:=0;F:=TFileStream.Create…

类别:文件 标签: 作者:admin 日期:2020-09-15 13.34.17

Delphi 快速选择文件夹路径

usesShlObj;functionFindFolder(Handle:THandle;Title:s****ing='请选择文件夹路径'):s****ing;var…

类别:文件 标签: 作者:admin 日期:2020-09-15 08.02.38

Delphi 删除文件函数支持撤销删除

usesShellAPI;functionDeleteFileWithUndo(sFileName:s****ing):boolean;varfos:TSHFileOpS****uct;beginFi…

类别:文件 标签: 作者:admin 日期:2020-09-15 07.51.40

Delphi 在长文件名和短文件名之间转换

usesWindows,SysUtils;functionGetShortName(sLongName:string):string;varsShortName:string;nShortNameLe…

类别:文件 标签: 作者:admin 日期:2020-09-15 07.44.02

Delph记录输出日志

Delphi程序在运行着,有时想获取一些程序运行的值的话,可以用下面的输出日志的函数来实现procedureWriteLo…

类别:文件 标签: 作者:admin 日期:2020-07-17 14.24.56

Delphi递归删除列表文件以外的所有文件

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes…

类别:文件 标签: 作者:admin 日期:2020-05-28 08.10.02

delphi 无法打不开读取文件名有逗号的文件

解决办法:文件路径加双引号

类别:文件 标签: 作者:admin 日期:2020-05-13 14.12.59

delphi 读取正在被占用的txt文件

procedureTForm1.FormCreate(Sender:TObject);varFileSteam:TFileStream;beginFileSteam:=TFileStream.Crea…

类别:文件 标签: 作者:admin 日期:2020-04-16 23.38.30

Delphi中对Excel表格文件的导入和导出操作

首先,Delphi要在Uses部分,把要使用的外部程序的类写入。在这里,我们把“ExtCtrls,ComObj”写入Uses部分。…

类别:文件 标签: 作者:admin 日期:2020-04-10 19.54.00

delphi 创建多级目录

functionMyCreateDir(constPath:String):Boolean;begin//建目录ifDirectoryExists(Path)thenResult:=Trueel…

类别:文件 标签: 作者:admin 日期:2020-04-07 15.12.55

Delphi 下找到目录中的所有文件夹

usesioutils,TypesprocedureT****2.****Create(Sender:T****);vardfs:TS****ingDynArray;s****Directory:s*…

类别:文件 标签: 作者:admin 日期:2020-04-04 18.30.35

delphi删除整个目录及目录下的文件

//删除整个文件夹及其下的所有文件functionDelDirAll(aDir:string):Boolean;varvSearch:TSearchRec;vRet:in…

类别:文件 标签: 作者:admin 日期:2020-04-04 17.18.13

Delphi复制文件夹内所有文件

functionDoCopyDir(sDirName:string;sToDirName:string):Boolean;varhFindFile:Cardinal;t,tfile:string;sC…

类别:文件 标签: 作者:admin 日期:2020-04-04 15.59.08

delphi拷贝整个目录(包括子目录)

functionCopyDirAll(sDirName:String;sToDirName:String):Boolean;varhFindFile:Cardinal;//拷贝整个目录(包…

类别:文件 标签: 作者:admin 日期:2020-04-04 15.58.13

delphi下对dbf文件进行物理删除

我们知道,一般的dbf文件执行delete操作都只是对文件进行逻辑删除(对记录做标记,可以恢复),而怎么使记录…

类别:文件 标签: 作者:admin 日期:2020-04-01 11.02.45

delphi TLog 日志

varLg:TLogs;Lg:=TLogs.Create('_sql.log');Lg.Log('日志内容');Lg.Destroy();unitTLog;interfac...

类别:文件 标签: 作者:admin 日期:2020-03-28 21.54.02

delphi 简单的日志记录

procedureSaveSoldierLog(constsMessage:string);varfn:string;sList:TStrings;beginfn:=ExtractFilePath(P…

类别:文件 标签: 作者:admin 日期:2020-03-28 12.34.47

delphi 获取\xxx\xxxx\1234最后一级名称

functionGetLastName(constfn:string):string;vari:Integer;s:string;begins:=trim(fn);ifs[Length(s)]='\'…

类别:文件 标签: 作者:admin 日期:2020-03-27 22.54.41

delphi 根据文件扩展名判断文件类型函数写法

functionIsImageFile(constfn:string):Boolean;varextfn:String;beginextfn:=LowerCase(ExtractFileExt(fn)…

类别:文件 标签: 作者:admin 日期:2020-03-27 22.39.05

Delphi出现 No mapping for the Unicode character exists in the target multi-byte code page 处理方法

当调用TStrings.LoadFromFile(html_file_name,TEncoding.UTF8);出现NomappingfortheUnicodecharacterexists…

类别:文件 标签: 作者:admin 日期:2020-03-27 12.39.03