String zerlegen und in Array speichern

[mkinzler]

Z.B. mit einer Stringlist:

Delphi-Quellcode:

var
  sl: TStrings;
  i: Integer;
  ...
begin
  try
    sl := TStringList.Create;
    sl.CommaText := <String>;
    for sl.Count-1 downto 0 do
      s2 := s2 + sl[i];
    ...
  finally
    sl.Free;
end;