Registry-Key löschen

[St.Pauli]

OK, das hab ich geändert, aber der existiert immer noch!

Code:

procedure TForm1.Button11Click(Sender: TObject);
var Reg: TRegistry;
begin
    Reg := TRegistry.Create;
    Reg.RootKey:=HKEY_CURRENT_USER;
    try
          Reg.DeleteKey('Software\Microsoft\Internet Explorer\TypedURLs\url1');
    finally
      Reg.Free;
    end;
end;