Kapseln von Registryzugriffen

[DeddyH]

Zitat von HeikoAdams:

Delphi-Quellcode:

constructor TAdvoPlex.Create;
var
  reg: TRegistry; //lokale Variable
begin
  inherited Create;
  reg := TRegistry.Create(KEY_ALL_ACCESS); //Erzeugt und nie benutzt
  reg.RootKey := HKEY_CURRENT_USER;
end;

destructor TAdvoPlex.Destroy;
begin
  FreeAndNil(reg); //welches reg?
  inherited Destroy;
end;

Das dürfte so wohl nicht funktionieren.