hexedezimal in registry auslesen problem

[G G]

hi

mein code, aber dort kommen so zahlen wie 1241252 oder 1243964 aber es sollte ein zahl wie 1 oder 0 rauskommen

Delphi-Quellcode:

with TRegistry.Create do
  begin
    try
      RootKey := HKEY_CURRENT_USER;
      if OpenKey('SYSTEM\CurrentControlSet\Control\Lsa', False) then
      begin

        meinint :=  Readinteger('restrictanonymous');
     
showmessage (inttostr(meinint));
      end;
    finally    
      Free;
    end;