Wie kann mann Registry ändern

[faux]

Delphi-Quellcode:

procedure WriteKey(Value: Integer);
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;                        // Instanz erzeugen
  try                                             // Falls Fehler auftreten, gehts hier weiter --+
    Reg.RootKey := HKEY_CURRENT_USER;             // Schlüssel zuweisen                          |
    Reg.OpenKey('Software\joel92\Product', True); // Pfad auswählen (der 2. Parameter            |
                                                  // gibt an, ob der Pfad angelegt               |
                                                  // werden soll, wenn es ihn noch               |
                                                  // nicht geben sollte)                         |
    Reg.WriteInteger('Name', Value);              // Wert in die Registry schreiben,             |
                                                  // wobei der Name des Wertes "Name"            |
                                                  // lautet und der Wert der Prozedur            |
                                                  // übergeben wird.                             |
    Reg.CloseKey;                                 // Schlüssel wieder schließen                  |
  finally     // <-------------- (hier gehts auch weiter, wenn kein Fehler auftritt) ------------+
    Reg.Free;                                     // Instanz wieder freigeben
  end;
end;

Grüße
Faux