Substrings Extract Delimited Values

[Olli73]

Warum nicht einfach:

Delphi-Quellcode:

var
  SL: TStringList;
begin
  SL := TStringList.Create;
  SL.Delimiter := ADelimiter;
  SL.StrictDelimieter := True;
  SL.DelimitedText := AText;
  ...

Oder habe ich etwas falsch verstanden?