Implode w delphi

Czy jest funkcja która by działała jak Implode z PHP czyli majac stringa typu
"abc,dsad,gdhfg,cvxb,asdfs"
rozdzieliła by go na elementy tablicy według określonego separatora??
pisanie recznie takiej funkcji by było pewnie wolne w działaniu a zależy mi na wydajności.

Uscislajac, w PHP do tego sluzy funkcja explode ;)
Jezeli korzystasz z .NET - to tak: http://4programmers.net/Delphi/Gotowce/Wykorzystanie_funkcji_Split_w_Delphi_8

Jezeli nie - to nie istnieje: http://4programmers.net/Delphi/FAQ/Tekst/Jak_rozdzieli%C4%87_%C5%82a%C5%84cuch_tekstowy_wg._jakiego%C5%9B_znaku

Chamskie i szybkie rozwiazanie:

  StrList := TStringList.Create;
  StrList.Text := StringReplace(Text, '|', #13, [rfReplaceAll]);