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

Delphi 根据扩展名的文件搜索

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

类别:文件 标签: 作者:admin 日期:2020-02-10 15.47.08

Delphi UDL文件创建

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

类别:文件 标签: 作者:admin 日期:2020-02-09 12.16.57

Delphi TDictionary保存到文件

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

类别:文件 标签:****ictionary 作者:admin 日期:2020-02-05 18.32.53

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

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

类别:文件 标签: 作者:admin 日期:2020-02-05 13.01.10

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

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

类别:文件 标签: 作者:admin 日期:2020-02-05 12.43.37

Delphi 检测文件数字签名

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

类别:文件 标签: 作者:admin 日期:2020-02-05 12.04.42

Delphi TStreamWriter快速写入文件

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

类别:文件 标签: 作者:admin 日期:2020-02-05 10.55.09

delphi 生成xml 方法 与 delphi txt文件操作

ProcedureTForm1.Button1Click(Sender:TObject);Varxmlstr,FileName:String;f:Textfile;BeginxmlStr:='';xm…

类别:文件 标签: 作者:admin 日期:2020-02-05 10.50.15

Delphi 调用API打开文件 使用系统默认打开方式进行打开

usesshellapi;//调用API打开文件使用系统默认打开方式进行打开.procedure.OpenFileAPI(sfn:string);beginSh…

类别:文件 标签: 作者:admin 日期:2020-01-30 13.36.41

Delphi 获取用户当前的Windows临时文件夹

//获取用户当前的Windows临时文件夹functionGetWinTempPath:string;varTempDir:array[0..255]ofchar;beginG…

类别:文件 标签: 作者:admin 日期:2020-01-30 13.25.31

Delphi 取目录下指定文件到列表

procedureTForm1.searchfile(Astrs:TStrings;path:string);//注意,path后面要有'\';var//取目录下的SQL文件…

类别:文件 标签: 作者:admin 日期:2020-01-30 02.05.49

Delphi 判断文件扩展名函数

作者:小宇飞刀functionIsImageFile(constfn:string):Boolean;varextfn:String;beginextfn:=LowerCase(Extr…

类别:文件 标签: 作者:admin 日期:2020-01-30 01.53.49

Delphi SaveLog 日志

procedureSaveLog(constsMsg:s****ing);varsList:TS****ingList;fn:s****ing;beginsList:=TS****ingList.Cr…

类别:文件 标签: 作者:admin 日期:2020-01-30 01.30.28

Delphi2010新功能:TDirectory.GetFiles 支持通配符

Delphi2010新增功能之:IOUtils单元:TDirectory.GetFiles支持通配符unitUnit1;interfaceusesWindows,Message…

类别:文件 标签: 作者:admin 日期:2020-01-19 14.38.58

Delphi 查询当前目录下文件名是否存在

procedureTForm1.Button1Click(Sender:TObject);varFileToFind:string;beginFileToFind:=SysUtils.FileSear…

类别:文件 标签: 作者:admin 日期:2020-01-19 00.24.56

Delphi ShellExecute打开文件另类用法

ifStrLen(PChar(filePathEdit.Text))>0thenbeginifShellExecute(Handle,'open',PChar(filePathEdit.Text),n…

类别:文件 标签: 作者:admin 日期:2020-01-16 00.38.02

Delphi 最简单的文件大小Bytes转MB

functionBytesToMB(X:Int64):String;beginResult:=FormatFloat('0.00MB',X/1024/1024);end;

类别:文件 标签: 作者:admin 日期:2020-01-16 00.00.40

Delphi GetFileSize 获取文件大小 2

functionGetFileSize(constaFileName:String):Int64;varSr:TSearchRec;beginifFindFirst(aFileName,faAnyFi…

类别:文件 标签: 作者:admin 日期:2020-01-15 23.59.48

Delphi FileOpenDialog1 多选加载大量文件,不受中文文件名影响

//OpenDialog1多选模式加载大量包含中文名文件会出错。20200114vari:integer;s****:s****ing;tmp:TS****ing…

类别:文件 标签: 作者:admin 日期:2020-01-14 17.38.36

delphi OleVariant excel保存文件

usesComObj,Excel;varExcel:OleVariant;Excel:=CreateOleObject('EXCEL.Application');Excel.Application.W…

类别:文件 标签: 作者:admin 日期:2020-01-14 12.38.17