Registry überprüfen

[bonanza]

Hi,

wie kann man kontrollieren, ob bereits ein Registry-Key existiert ? Und wenn nicht einen erstellen ?

danke schonmal im voraus

[Sharky]

Zitat von bonanza:

...wie kann man kontrollieren, ob bereits ein Registry-Key existiert ?

Hai bonanza,

mit .KeyExists kannst Du prüfen ob ein Schlüssel vorhanden ist.

Aber wenn Du ihn in jedem Fall haben möchtest reicht doch in CreateKey wenn ich mich recht entsinne wird dabei ein vorhandener Schlüssel ja nicht überschrieben.

[faux]

Also auch die Methode OpenKey erstellt den Schlüssel, wenn er nicht existriert und der zweite Parameter true ist.

Grüße
Faux

[bonanza]

super danke funktioniert einwandfrei...aber noch eine frage...

Manchmal gibt es ja den Key
(Standard) , dem dann ein Wert zugeordnet ist, wie kann ich einen Solchen Key erstellen bzw ändern ?


danke schonmal im voraus

mfg

[faux]

Den Wert gibts nicht nur manchmal, sondern immer.
Einfach als Name einen leeren String angeben bei WriteString:

Delphi-Quellcode:

procedure WriteIntoRegistry;
var
  Registry: TRegistry;
begin
  try
    Registry := TRegistry.Create;
    Registry.RootKey := HKEY_CURRENT_USER;
    Registry.OpenKey('Software\Firma\Produkt\Version', True);
    Registry.WriteString('', 'Wert');
  finally
    Registry.Free;
  end;
end;

Grüße
Faux