String in Variablen "umwandeln"

[Hawkeye219]

Hallo,

wenn man statt ReadSection die Methode ReadSectionValues verwendet, wird die Sache etwas einfacher:

Delphi-Quellcode:

var
  Options: TStrings;
  Ini: TMemIniFile;
  i: Integer;
  OptionName: string;
  OptionValue: string;
begin
  Options := TStringList.Create;
  try
    Ini := TMemIniFile.Create(ExtractFilePath(ParamStr(0)) + 'Options.ini');
    try
      Ini.ReadSectionValues ('option', Options);
    finally
      Ini.Free;
    end;

    for i := 0 to Options.Count - 1 do
      begin
        OptionName := Options.Names[i];
        OptionValue := Options.Values[OptionName]; // oder Options.ValueFromIndex[i]

        ShowMessage (Format('Wert von %s: %s', [OptionName, OptionValue]));
      end;
  finally
    Options.Free;
  end;
end;

Gruß Hawkeye