Delphi设置文件和文件夹属性

Delphi 的文件属性设置还蛮实用的,尤其是你想搞点权限控制、做个只读文档、或者隐藏点不想让用户直接改的配置文件啥的。TFileTDirectory两个类挺方便,配合TFileAttributes枚举,设置属性就像配菜一样简单。

faReadOnlyfaHidden这些属性都能直接上,用 TFile.SetAttributesTDirectory.SetAttributes 就行。比如你想把一个文件变成只读+隐藏,那就:

TFile.SetAttributes('C:\mydata.txt', faReadOnly or faHidden);

如果你项目里有需要对配置文件动点小手脚,这一招就挺好用。还可以用 TFile.GetAttributes 查当前状态,方便做判断。哦对了,记得加个 try...except,要是路径错了或者权限不够,不然直接报错可不太优雅。

另外如果你想批量一堆文件或目录,也能写个递归函数搭配 TDirectory.GetFiles 之类的搞定。效率也不错。再深入点,也可以用 SetFileAttributesW 这些 API 做更底层的事,Delphi 和 Windows 打配合还是挺顺的。

如果你对这块还想深入了解几个细节,可以看看这几篇文章:

如果你平时需要在项目里设置文件或目录的访问状态,这几个 API 你一定得掌握,灵活又不难用。

rar 文件大小:166.78KB