Sicherheitseinstellungen von Dateien ändern

[Tpercon]

In der MSDN habe ich dazu folgendes gefunden
file security and access rights
Komme damit & den weiterführenden Links aber noch nicht klar. Weiß nicht, wie ich die Funktionen richtig kombinieren muß.

Wie kann ich die Sicherheitseinstellungen für bestimmte Dateien ändern? Ein kleines Code Beispiel wäre sehr hilfreich.

[Tpercon]

Weiß keiner nen Ansatz?
Möchte nur paar Rechte entfernen bzw. hinzufügen können.

[oki]

Hallo,

schau mal in der OH unter SetFileAttributes nach.
Das währe jetzt aber eine Änderung direkt für die Datei, nicht fürs System.

Schau mir gleich noch mal deinen Link an.

Gruß oki

[oki]

Ja o.k.,

da mußt du dir nur erst das Handle mit createFile holen um dann die Attribute zu setzen.

Hab ich alles so aber noch nie gebraucht und deshalb auch keine praktischen Erfahrungen.

Probiers erst mal aus.

Gruß oki

[Tpercon]

Genau, die Funktion SetFileAttributes kann zu wenig. Ich brauche eine Möglichkeit die Berechtigungen der Sicherheitseinstellungen für eine Datei ändern zu können. Und das geht irgendwie über SetSecurityInfo, nur ich weiß praktisch nicht richtig wie.

[oki]

Also,
hab ich so noch nie gemacht und ist auch im Ansatz ungetestet.

Ich denke aber, so kommst du weiter.

Delphi-Quellcode:

Function OpenFileSecure: Boolean;
var FiH : THandle;
    FiName : String;
    SecAtr : Security_Attributes;
begin
  Result := False;
  // Dateiname mit komlettem Pfad
  FiName := 'MeineDatei' + 0;
  // Security_Attributes - Struktur füllen
  Fillchar(SecAtr, Length(Security_Attributes), 0);
  secAtr.bInheritHandle := True;
  secAtr.nLength := Length(SecAtr);
  // Handle holen
  FiH := CreateFile( @FiName[1],
         FILE_ALL_ACCESS,
         FILE_SHARE_WRITE,
         secAtr,
         OPEN_EXISTING,
         FILE_ATTRIBUTE_NORMAL,
         0);
  // Handle prüfen
  If FiH = 0 then Exit;
  // und jetzt SetSecurityInfo

  Result := True;
end;

Nach dem alles geklappt hat vergiß CloseFile nicht!

Gruß oki

[Tpercon]

Danke, der Ansatz ist OK. Nur das Problem im weiteren ist der security descriptor. Wie arbeitet man damit?
Mir würde ja schon das Anzeigen davon erstmal genügen.

[oki]

Mach es dir einfach,

ruf erst GetSecurityInfo oder GetNamedSecurityInfo auf, vweänder die entsprechenden Flags und setze die neuen Werte dann über sie ensprechende Set-Methode.

Vergiß aber den ganzen Freigabekram nicht. Also immer schön die OH lesen.

Gruß oki

[Tpercon]

Ich würde nur gerne erstmal die Infos anzeigen lassen und das alles besser zu verstehen. Nur bekomm ich dieses Auslesen und Anzeigen (Umwandlung dere Infos als strings) nicht hin.

[oki]

ich muß jetzt leider los,

probier mal rum, sag mir bis morgen wie weit du bist und ich helf weiter.

(Vielleicht findet sich noch einer zwischendurch, der dir mehr dazu sagen kann)

Gruß oki