Hy,
habe die Prozedur zu einer Funktion umgebaut:
Delphi-Quellcode:
function RegDeleteKeyEx(const hKey: HKEY;const lpSubKey: string;
const samDesired: REGSAM; reserved : DWORD): boolean; stdcall;
external 'advapi32.dll' name 'RegDeleteKeyExW';
In meinem Programm rufe ich das so auf:
Delphi-Quellcode:
if RegDeleteKeyEx(HKEY_LOCAL_MACHINE, '\Software\Test', KEY_WOW64_64KEY, 0) then
showmessage(SysErrorMessage(GetLastError))
else showmessage(SysErrorMessage(GetLastError));
Als Fehlermeldung erhalte ich: "der Vorgang wurde erfolgreich beendet"
Der Schlüssel in der Registry wurde jedoch nicht gelöscht, was läuft falsch ??
KUBA