String str1="1,2,3,4,5,6";
String str2[6];
TStringList   *list=new   TStringList; 
list-> delimiter= ', '; 
list-> delimitedText=str1; 
for   (int   i=0;i <list-> Count   ;i++) 
{ 
        str2[i]=list-> Strings[i]; 
} 
delete list;