delphi 以Bytes为单位获取文件大小

//maxiumsupports2GfunctiongetFileSizeInBytes(constfn:string):integer;varf:Fileofbyte;beginResult:=-1…

delphi 判断文件是否被使用

functionIsFileInUse(fName:string):boolean;varHFileRes:HFILE;beginResult:=false;ifnotFileExists(fName…

delphi中如何实现模糊查找文件

delphi中如何实现模糊查找文件procedureGetFilenames(sPath,sFilename:String;AList:TStrings);//功能描述:…

delphi 删除整个目录

functionDeleteDirectory(NowPath:string):Boolean;//删除整个目录varf:TSearchRec;ret:integer;key:string…

delphi 拼接文件路径

functionConcatEnclosure(dir,Numbers:string):string;begin//拼接路径Result:=Concat(Dir,'\'+Numbers);en…

delphi 判断目录是否存在,不存在则创建目录并打开,存在则直接打开

procedureCreateOpenDir(h:THandle;dir:string;IsOpen:Boolean=False);vars:Cardinal;beginifnotDirectoryE…

delphi XE 枚举指定目录及子目录下的所有文件

procedureDoEnumAllFiles(strPath:string;FileList:TStrings);{功能:枚举指定目录及子目录下的所有文件}var…

delphi IOUtils TDirectory获取一个目录下所有文件名，包括子目录

usesIOUtils,Types;functionFList(constASourFile:string):TStrings;vara:TStringDynArray;i:integer;begin…

delphi 与 c# 生成不带BOM的UTF8文件

演示环境为delphixe2与vs2015社区版delphi方式1-传统方式varffileStream:TFileStream;futf8Bytes:string;S:…

delphi 生成txt 指定带BOM

varlst_s:TStrings;s:UTF8String;....lst_d.Add(s);lst_d.WriteBOM:=True;//指定带BOMlst_d.SaveToFile('G:…

DELPHI 读取文本文件的最后一行

procedureTForm2.Button1Click(Sender:TObject);varStrLst:TStringList;beginStrLst:=TStringList.Create;S…

Delphi 上次访问该文件的时间

functionGetFileLastAccessTime(sFileName:s****ing):****ateTime;varffd:TWin32FindData;dft:DWord;lft:TF…

Delphi 调用ShellExecute打开txt文本

usesWinTypes,ShellAPI;procedureOpenObject(sObjectPath:string);beginShellExecute(0,nil,PChar(sObjectP…

Delphi 根据扩展名的文件搜索

procedureGetAllFilesEM(Path,ExtMask:String;List:TStrings;SubFolder:Boolean);varAttrib,k:Integer;Sear…

Delphi UDL文件创建

procedureWriteUDLFile(constUDLFile:string);const//DefaultConnectionStringusedbyourapplication(SQLSer…

Delphi TDictionary保存到文件

typeTFilePos=TArray;TFileDict=TDictionary;TWordDict=class(TDictionary)privateprocedureLoadFromStream…

Delphi 如何使用FindFirst搜索不同的文件类型？

procedureFileSearch(constPathName:string;constExtensions:string;varlstFiles:TStringList);constFileMa…

Delphi 中流的使用通过内存流读取文件

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,St…

Delphi 检测文件数字签名

UsesWinapi.Windows,JwaSoftpub,CAPICOM_TLB,JwaWintrust;FunctionIsCodeSigned(constFilename:String):Boo…

Delphi TStreamWriter快速写入文件

functionInitLog(constFileName:string):TStreamWriter;beginResult:=TStreamWriter.Create(FileName,True)…