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;

[Christian Seehase]

Moin G G,

also mir ist ein Rätsel, wieso überhaupt etwas angezeigt, wird, denn HKCU\SYSTEM gibt es IMHO normalerweise nicht.

[EDIT]
Vermutung:
In Deinem Programm liegt das ShowMessage nicht im then-Zweig und zeigt den Wert an, den die Variable beim Aufruf der Methode eben gerade hat.
[/EDIT]

[G G]

hehe ich bin so blöd hklm natürlich :-) jetzt gehts auch, vielen dank