INIDatei: Namen der Sections auslesen

[Luckie]

Ich würde es so machen (wenn ich dein Problem richtig verstanden habe):

Delphi-Quellcode:

uses
  IniFiles;

procedure TForm1.Button1Click(Sender: TObject);
var
  ini: TIniFile;
  sl: TStringList;
  i: Integer;
begin
  ini := TIniFile.Create('c:\boot.ini');
  try
    sl := TStringList.Create;
    try
      try
        ini.ReadSections(sl);
        ShowMessage('Anzahl der Sektionen: ' + IntToStr(sl.Count));
        for i := 0 to sl.Count - 1 do
          ShowMessage('Sektion: ' + IntToStr(i+1) + #13#10 + 'Sektionsname: ' + sl.Strings[i]);
      except
        on E: Exception do
          ShowMessage(E.Message);
      end;
    finally
      sl.Free;
    end;
  finally
    ini.Free;
  end;
end;