FormatINI

[himitsu]

Zitat von EWeiss:

Letztendlich führen viele Wege zum ziel.

Auch für Schleifenfetischisten gibt's Vieles.

Delphi-Quellcode:

StringList.LoadFromFile(Filename);
for i := StringList.Count - 1 downto 1 do
  if StartsStr('[', StringList[i]) and (StringList[i - 1] <> '') then  // ich hoffe die Parameter bei StartsStr sind richtigrum
    StringList.Insert(i, '');
StringList.SaveToFile(Filename);