Forum: Win32/Win64 API (native code)
Delphi
by jaenicke,
30. Dez 2011
Funktioniert problemlos. Nur dass du beim ersten if aus Versehen KeyExists statt ValueExists drin hast und beim zweiten DigitalProductId64 statt DigitalProductId4...
Wenn ich beides korrigiere, klappt es auch.
// EDIT:
Übrigens geht in aktuellen Delphiversionen auch OpenKeyReadOnly, das war nur in deinem alten Delphi 7 noch ein bekannter Bug. ;-)
Forum: Win32/Win64 API (native code)
Delphi
by jaenicke,
30. Dez 2011
Du benutzt OpenKeyReadOnly. Damit setzt du die Zugriffsflags zurück. Damit geht das nicht. ;-)
Forum: Win32/Win64 API (native code)
Delphi
by jaenicke,
30. Dez 2011
Du musst als Zugriffsflag KEY_WOW64_64KEY, also $0100, übergeben, damit du aus dem 64-Bit Zweig liest. Das hätte Google dir aber auch gesagt. :angel:
Forum: Win32/Win64 API (native code)
Delphi
by jaenicke,
30. Dez 2011
Also bei mir existieren die auch nicht. Siehe hier:
Nur im 64-Bit Zweig gibt es die bei mir, aber auf den greifst du ja nicht zu.