文件属性问题？

Question

var attr:integer;
attr:=filegetattr(lbxfile.filename);
if attr and fareadonly=fareadonly then
cbxreadonly.checked:=true;
else
cbxreadonly.checked:=false;
我不明白attr and fareadonly 是什么意思？

Answer 1

位操作，if (Attr and faReadOnly = faReadOnly)含义是：如果文件属性（Attr）中包含了只读属性

Answer 2

Attr当中按位（bitwise）保存着文件的不同属性的取值，其中包括“是/否”只读等，分别置“位”值为“1”/“0”。按位与的结果就是“同真为真”，可以只看“只读”的“位值”是否为“真”，而知道是否只读属性。