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

delphi – 如何将多个文件扩展名传递给TDirectory.GetFiles?

TDirectory.GetFiles有一个名为SearchPattern的参数.Embarcadero的文档说Themaskusedwhenmatchingfilenames…

类别:文件 标签: 作者:admin 日期:2019-10-18 14.27.54

delphi开发获取文件MD5值

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

类别:文件 标签: 作者:admin 日期:2019-10-15 11.26.08

Delphi xe IOUtils 单元(1): 初识 TDirectory.GetFiles

用IOUtils单元下的TDirectory.GetFiles获取文件列表太方便了;下面的例子只是TDirectory.GetFiles的典型应用…

类别:文件 标签: 作者:admin 日期:2019-10-14 00.53.19

Delphi 加载文件列表显示进度条

usesIOUtils,Types;procedureTProgressForm.ProgressBarStepItOne;beginProgressBar1.StepBy(1);ProgressBa…

类别:文件 标签: 作者:admin 日期:2019-10-14 00.51.16

Delphi IFileOperation替换SHFileOperation

从WindowsVista(和WindowsServer2008)开始,WindowsAPI库具有一种执行文件操作(如复制,移动,删除以及类…

类别:文件 标签: 作者:admin 日期:2019-10-14 00.38.14

Delphi TStyleManager读取vsf皮肤文件信息

{$APPTYPECONSOLE}{$R*.res}usesSystem.SysUtils,Vcl.Styles,Vcl.Themes;varStyle:TStyleInfo;begintryifTS…

类别:文件 标签: 作者:admin 日期:2019-10-13 23.15.28

delphi 创建一个文本文件

//创建一个文本文件procedureTFrmAutomatismBalance.FlatButton3Click(Sender:TObject);varTF:TextFile;Pat…

类别:文件 标签: 作者:admin 日期:2019-10-12 12.13.19

DELPHI 直接调用记事本(NOTEPAD)打开文本文件

uses加入shellapi;ShellExecute(Handle,'Open',PChar('notepad.exe'),PChar('c:\readme.txt'),nil,SW_SHOWN…

类别:文件 标签: 作者:admin 日期:2019-10-12 12.11.41

Delphi 获取文件夹路径最后一级文件夹目录名称

vardir:string;begindir:='D:\delphi\lib';dir:=ExtractFileName(dir);ShowMessage(dir);//结果libend;

类别:文件 标签: 作者:admin 日期:2019-10-12 10.43.21

Delphi从路径取得文件名的简易方法

Delphi从路径取得文件名的简易方法FileList.Strings[i]是文件路径(含文件名):StringReplace(FileList.Stri…

类别:文件 标签: 作者:admin 日期:2019-10-12 09.45.14

Delphi 文件的操作:重命名、复制、移动、删除

Delphi文件的操作:重命名、复制、移动、删除RenameFile('Oldname','Newname');//重命名CopyFile(PChar('Ol…

类别:文件 标签: 作者:admin 日期:2019-10-12 09.35.36

Delphi 获取文件大小根据显示GB MB KB B

functionGetFileSize(constFileName:string):DWORD;varf:integer;beginf:=FileOpen(FileName,fmOpenRead);t…

类别:文件 标签: 作者:admin 日期:2019-10-11 12.17.59

delphi filestream

procedureTForm1.Button1Click(Sender:TObject);varf1:TFileStream;filename:String;beginOpenDialog1.Exec…

类别:文件 标签: 作者:admin 日期:2019-10-10 14.06.34

Delphi IdHashMessageDigest 获取文件MD5

usesIdHashMessageDigest;functionMD5(constfileName:string):string;varidmd5:TIdHashMessageDigest5;fs:T…

类别:文件 标签: 作者:admin 日期:2019-10-08 09.23.49

Delphi 文件转换Base64

usesEncdDecd;functionFileToBase64(FileName:string):string;varMemoryStream:TMemoryStream;beginResult:…

类别:文件 标签: 作者:admin 日期:2019-10-06 13.30.28

Delphi 获取文件创建时间,修改时间,最后

functionGetFileLastAccessTime(FileName:string;AFlag:Integer):TDateTime;varWFD:TWin32FindData;FileTim…

类别:文件 标签: 作者:admin 日期:2019-09-30 19.13.19

Delphi 取得文件版本

//取得文件版本functionGetFileVer(strFileName:String):String;varn,Len:DWORD;Buf:PChar;Value:Pointer;s…

类别:文件 标签: 作者:admin 日期:2019-09-28 20.50.01

Delphi txt日志log

{新建一个TXT文档}ProcedureNewTxt(FileName:String);VarF:Textfile;{定义F为Textfile}BeginAssignFile(F,F…

类别:文件 标签: 作者:admin 日期:2019-09-28 20.40.04

Delphi 先加载原内容在写入增加新内容

{先附上原内容在写入新内容}ProcedureAppendTxt(Str:String;FileName:String);VarF:Textfile;BeginAssignFi…

类别:文件 标签: 作者:admin 日期:2019-09-28 20.38.43

Delphi判断文件夹(目录)是否存在,不存在就创建的办法

procedureTForm1.Button1Click(Sender:TObject);beginifnotFileExists(Edit1.Text)then//ifnotDirectoryExi…

类别:文件 标签: 作者:admin 日期:2019-09-27 23.04.43