Desktop.ini datei öffnen

[xZise]

Hi,
ich habe mir mal das komplette TNTPack gedownloadet und installiert.
Allerdings habe ich nun versucht die "TTNTIniFile" zu verwenden, aber leider funktioniert das irgendwie nicht:

Delphi-Quellcode:

with TTntIniFile.Create(FPath + sr.Name + '\Desktop.ini') do
  try
    pathbuffer := ReadString('.ShellClassInfo', 'InfoFile', '');
    if Length(pathbuffer) >= 1 then
    begin
      if pathbuffer[1] = '%' then
      begin
        pathbuffer := Copy(pathbuffer, 2, Length(pathbuffer) - 1);
        idx := Pos('%', pathbuffer);
        pathbuffer := Copy(pathbuffer, 1, idx - 1);
        pathbuffer := GetEnvironmentVariable(Copy(pathbuffer, 1, idx - 1)) + Copy(pathbuffer, idx + 1, Length(pathbuffer) - idx);
      end;
      idx := 0;
    end else
      idx := 0;
  finally
    Free;
  end;

Aber ich bekomme immer nur einen Leerstring !
Obwohl die Datei existiert:

Zitat:

[.ShellClassInfo]
IconFile=%SystemRoot%\system32\SHELL32.dll
IconIndex=85