wert aus registry lesen

[sakura]

Versuche es mal so:

Delphi-Quellcode:

var
  regist: TRegistry;
begin
  regist:=TRegistry.Create;
  try
    regist.RootKey := HKEY_CURRENT_USER;
    if regist.OpenKey('Software\DirIcon\Folder', True) then
    try
      if regist.ValueExists('Anzahl') then
        Wert := regist.ReadInteger('Anzahl');
    finally
      regist.CloseKey;
    end;
  finally
    regist.Free;
  end;
end;

Ein Fehler kommt nur, wenn Anzahl nicht vom Typ Integer ist.

......