1:
2:
3:
4:
5:

begin
  if Uppercase(PluginType) = 'TDCSCONNECTIONPLUGIN' then
  begin
    ConfigFilePath := Manager.Configuration.GetString('dcs.ConfigFile');
    ConfigFilePath := utils.CompleteRelativePath(ConfigFilePath);					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TForm1.Button1Click(Sender: TObject);
var
  IniFile: TIniFile;
  Liste: TStrings;
begin
  Liste := TStringList.Create;
  IniFile := TIniFile.Create('Datei.ini');
  IniFile.ReadSections(Liste);
  //Liste verarbeiten
  IniFile.Free;
  Liste.Free;
end;					

1:

ReadSection('Name der Sektion', Liste);