Witam,
chciałbym zapisać w rejestrze pliku HKEY_LOCAL_MACHINE\Moja aplikacja 1.0
w pliku StartingPath jakąś wartość (w przykładzie waartość podana w parametrze Path).
Ale potrzebne są do tego uprawnienia administratora.
Chciałbym sprawdzić czy użytkownik posiada takie uprawnienia, jeżeli tak to nastepuje zapis.
Jezeli nie to zapisuje wartość w pliku: HKEY_CURRENT_USER\Moja aplikacja 1.0.
Jak moge sprawdzić te uprawnienia??
procedure TForm1.WriteToRegistry(Path: String);
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
{if uzytkownik ma uprawnienia then
Reg.RootKey := HKEY_LOCAL_MACHINE;
ZAPIS
}
else
begin
if Reg.OpenKey('Moja aplikacja 1.0', True) then
ShowMessage('Klucz otwarty!') else ShowMessage('Błąd!');
Reg.WriteString('StartingPath', Path);
end;
Reg.Free;
end;