Delphi浏览并修改文件属性,可浏览到需要修改属性的文件夹,选中文件,可修改文件的只读、隐藏、存档、系统等属性,和Windows系统中修改文件属性的功能是一样的。一些具体的属性修改代码:
procedureTForm1.FileListBox1Change(Sender:TObject);
var
attr:integer;
begin
attr:=0;
ifFileListBox1.FileName=''then
begin
cbxReadOnly.Checked:=False;
cbxSysFile.Chec