Jcl String Function

Is there a function in the jcl that returns the nth String from a 
string containing a comma separated list of sub-strings. e.g.

Var
  MyCommaSeparateString: String
  MyExtractedString: String
begin
  MyCommaSeparateString := 'First,Second,Third';
  MyExtractedString := MyJclRequiredFunction(MyCommaSeparateString,1);
  //MyExtractedString now contains 'First'
  MyExtractedString := MyJclRequiredFunction(MyCommaSeparateString,2);
  //MyExtractedString now contains 'Second'
  ...
end;




 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Delphi-JEDI/

<*> To unsubscribe from this group, send an email to:
    [email protected]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/