Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Datei Attribute ändern (https://www.delphipraxis.net/5927-datei-attribute-aendern.html)

iaby 23. Jun 2003 15:04


Datei Attribute ändern
 
hallo zusammen,

es geht darum, dass ich eine datei habe, bei der das archiv-attribut gesetzt ist. jetzt will ich dieses mir meinem prog löschen! aber wie stelle ich das an?
ich habs mal so probiert:
Code:
SetFileAttributes(PChar(sourcefile), FILE_ATTRIBUTE_NORMAL);
allerdings funktioniert das leider nicht. das beispiel aus der hilfe bekomme ich nicht einmal zum laufen ;-(
ich denke mal ihr könnt mir helfen, ist ja eigentlich eine leichte frage, oder???

gruss,
iaby

Christian Seehase 23. Jun 2003 15:12

Moin iaby,

Du musst erst einmal mit GetFileAttributes die bestehenden auslesen, dann das gewünschte Attribut daraus löschen.
Das Ergebnis kannst Du dann dazu benutzen die neuen Attribute zu setzen:

Ein Attribut löschen kannst Du indem Du den jeweiligen Wert invertierst (not) und dann logisch und (and) mit den bestehenden Attributen der Datei verknüpfst.

iaby 23. Jun 2003 15:20

also beispielsweise:
Code:
SetFileAttributes(PChar(sourcefile), oldfileattribute and not faArchive);
werde es dann mal ausprobieren, wenn ich wieder Win laufen habe!
Dankeschön
iaby

Christian Seehase 23. Jun 2003 15:25

Moin iaby,

im Prinzip ja.
Ich würde allerdings bei der Verwendung von API Funktionen (und SetFileAttributes ist ja eine solche) auch immer die API Konstanten verwenden. Man kann nie wissen, ob die Borland Konstanten nicht völlig andere Werte enthalten.

iaby 24. Jun 2003 08:03

ok
danke hat funtkioniert!


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:39 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz