DWORD wert lesen ?

[spacewolf]

Moin,

ich versuche krampfhaft ein DWord Wert zu lesen

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Servic es\Cdrom]
"AutoRun"=dword:00000001

Folgenden Source benutze ich:

Delphi-Quellcode:

procedure ReadFromRegistry;
var
 reg : TRegistry;
begin
 reg := TRegistry.Create;
 reg.RootKey := HKEY_LOCAL_MACHINE;
 reg.OpenKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Cdrom',true);
 try reg.ReadInteger('AutoRun');

     //bAutoRunCD := Boolean();
 except
   ShowMessage(SysErrorMessage(GetLastError));
   bAutoRunCD := false;
 end;
 reg.CloseKey;
 reg.Free;
end;

Als Boolean bekomme ich ebenfalls eine Exception.
Als String einen leeren Wert.
Dabei will ich doch nur 0 oder 1 lesen und 0 oder 1 schreiben.

Weiß jemand wie man hier mit DWORD werte umgeht ?


danke euer Andreas

PS: ich möchte mit dieser Funktion den Autostart an und abstellen können.