Hallo,
ich hätte auch noch eine Alternative: Statt Delimiter die Eigenschaft NameValueSeparator strapazieren. Dann kann man auf die einzelnen Werte so zugreifen, als ob sie in zwei Arrays gespeichert wären. Sie sind aber nur in einer StringList gespeichert:
Delphi-Quellcode:
procedure LoadNamedValues(s: TStrings; fn: TFileName);
var
i: Integer;
begin
s.LoadFromFile(fn);
s.NameValueSeparator := ':';
for i := 0 to Pred(s.Count) do
ShowMessage(Format('%d: %s <-> %s', [s.Names[i], s.ValueFromIndex[i]]));
end;
Grüße vom marabu