@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);