Registry - Files lesen und löschen

[marabu]

Wenn du wildcards oder reguläre Ausdrücke verarbeiten willst, dann musst du entsprechenden Code nachrüsten. Für das Löschen aller Werte mit einem bestimmten Präfix zeige ich dir die Stelle, wo er hingehört:

Delphi-Quellcode:

uses
  StrUtils,
  Registry;

procedure DeleteValues(hive: Cardinal; const key, prefix: String);
var
  i: Integer;
  s: TStrings;
begin
  with TRegistry.Create do
  begin
    RootKey := hive;
    if OpenKey(key, False) then
    begin
      s := TStringList.Create;
      GetValueNames(s);
      for i := 0 to Pred(s.Count) do
        if AnsiStartsText(prefix, s[i]) then
          DeleteValue(s[i]);
      CloseKey;
      s.Free;
    end;
    Free;
  end;
end;

marabu