Probleme beim Auslesen von Registry Keys

[Sir Rufo]

Augen auf beim Eierlauf!

Delphi-Quellcode:

procedure TForm1.Button30Click(Sender: TObject);

var
regKey : TRegistry;

begin

  //Create Object
  regKey := TRegistry.Create(KEY_READ OR KEY_WOW64_64KEY);

  Try
    //Set Root Key
    regKey.RootKey := HKEY_LOCAL_MACHINE;

    //Open Registry Key
    If Not(regKey.OpenKeyReadOnly('SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update')) Then