我们如何检查目录是否是readOnly或Not?
解决方法
您可以使用
FileGetAttr
函数并检查是否设置了faReadOnly标志.
试试这段代码
function DirIsReadOnly(Path:string):Boolean; var attrs : Integer; begin attrs := FileGetAttr(Path); Result := (attrs and faReadOnly) > 0; end;