Readonly-Flag aus Datei entfernen

Readonly-Flag aus Datei entfernen

Readonly-Flag aus Datei entfernen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

Die folgende Funktion wird versucht, das Lesen Sie einzige Flag für eine Datei zu entfernen, benötigen Sie die Funktion in diesem Artikel (als https://www.howtodothings.com/ViewArticle.aspx?Article=755).

Funktion RemoveReadOnly (const FileName: String): Boolean;
beginnen
(* Erfolg übernehmen *)
Ergebnis: = True;

(* Sicherstellen, dass die Datei gelesen wird nur vor
Wir versuchen, und ändern Sie die Attribute *)
Wenn (IsReadOnly(FileName)) dann
beginnen
SetFileAttributes(PChar(FileName), FILE_ATTRIBUTE_NORMAL);

Ergebnis: = nicht IsReadOnly(FileName);
Ende;
Ende;