Fehlermeldung beim Schreiben in der Registry

[venice2]

@generic
Feine Sache gut erklärt!

Eins sollte man jedoch ändern wenn man vom Code her schon so penibel ist.

Delphi-Quellcode:

  If IsWow64 = True Then Begin
    Reg := TRegistry.Create(KEY_ALL_ACCESS OR KEY_WOW64_64KEY);
  End Else Begin
    Reg := TRegistry.Create(KEY_ALL_ACCESS OR KEY_WOW64_32KEY);
  End;

zu

Delphi-Quellcode:

  If IsWow64 Then
    Reg := TRegistry.Create(KEY_ALL_ACCESS OR KEY_WOW64_64KEY)
  Else 
    Reg := TRegistry.Create(KEY_ALL_ACCESS OR KEY_WOW64_32KEY);