Mit Hilfe einer Stringliste
Delphi-Quellcode:
var
sl: TStrings;
...
sl := TStringList.Create;
sl.Delimiter := ',';
sl.DelimitedText := s;
[Edit] Total vergessen zu sagen wie du auf die Teilstrings zugreifen kannst:
sl.Strings[x];
wobei x bei 0 beginnt. [/edit]