Moin Tommi,
probier das hier mal aus:
Delphi-Quellcode:
var
hRootKey : HKEY;
dwType : DWORD;
begin
if RegOpenKey(HKEY_LOCAL_MACHINE,PChar(device_key),hRootKey) <> ERROR_SUCCESS then exit;
try
if RegQueryValueEx(hRootKey,'Profile0',nil,@dwType,nil,nil) <> ERROR_SUCCESS then exit;
ShowMessage(IntToStr(dwType));
finally
RegCloseKey(hRootKey);
end;
end;
es gibt nämlich noch ein paar Registry Datentypen, die das Icon vom Typ binary haben, aber nicht vom Typ binary sind.
Zumindest habe ich so den Verdacht, dass D3 den Typ einfach nicht als solchen erkennt.
Ich hoffe mal, dass D3 die beiden Funktionen so implementiert, dass Du sie so 1:1 benutzen kannst.