SetFileAttributes bzw. FileSetAttr setzen Attribute nicht r.

[SirThornberry]

Also das mit dem Addieren ist völlig OK solange er nur einzelAttribute addiert. Dementsprechend war

Delphi-Quellcode:

Attrib := 0;
      if cbProtectedFile.Checked then
        Attrib := Attrib + faReadOnly;

      if cbArchiv.Checked then
        Attrib := Attrib + faArchive;

      if cbHiddenFile.Checked then
        Attrib := Attrib + faHidden;

      if cbSystemFile.Checked then
        Attrib := Attrib + faSysFile;

      FileSetAttr(FDoc.FFilename, Attrib);

völlig korrekt da keienr der faXXXXX Werte eine Kompinanten mehrere Attribute ist.