Аналог функции split в C#

// вот функция разбивает по-указанным разделителям
void split(TStringList* lout, char* str, const char* separator) {
      for(char* tok = strtok(str, separator); tok; tok = strtok(NULL, separator))
          lout->Add(tok);
}
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
       TStringList*  lst = new TStringList();  
 
       split(lst, "a|b|cd", "|");   // разбить, возвращает список разбитых значений 
 
       lst->Clear();
 
       // пример разбить на слова
       split(lst, "ADODB; RDO-DAO-ADO-ADO.NET", ",\n\t\r :;'-");
 
       for(int i = 0; i < lst->Count; i++) // вывести их
             ShowMessage(lst->Strings[i] );
 
 
       lst->Clear();
       delete lst;      // в конце удалить
       lst = NULL;
}

 String filename = "C:\\heuristic\\manhattan";
 TStringList *lst = new TStringList();
 split(lst,filename.c_str(),"\\");
 ShowMessage(filename);//C:

#include <memory>
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
     std::auto_ptr<TStringList> SL(new TStringList);
     SL->Delimiter= '|';
     SL->DelimitedText= "a|b|cd";
 
     // SL->Strings[0] = "a" ,SL->Strings[1] = "b" ...
 
     Memo1->Lines->Assign(SL.get());
}
//---------------------------------------------------------------------------

#include <StrUtils.hpp>
void __fastcall TForm2::Button1Click(TObject *Sender)
{
 TStringDynArray arr(SplitString(L"a|b|cd", L"|"));
    for (int i = 0; i < arr.Length; i++)
        ShowMessage(arr[i]);
}

String sample = "txt|csv|xml";
String sample_buff = sample;
split(sample_buff ,"|");
OutputDebugString(sample_buff);//txt
OutputDebugString(sample);//txt

// функция разбивает по-указанным разделителям, maked by xAtom from CyberForum
void split(TStringList* lout, char* str, const char* separator) {
      for(char* tok = strtok(str, separator); tok; tok = strtok(NULL, separator)) {
          lout->Add(tok);
      }
      return;
}
 
//Сформировать путь для отчета, создать нужные директории(если их еще не сущуствует)
String GetPathwayToReport (String filename, String type, String format) {
    TStringList*  lst = new TStringList();
        split(lst, filename.c_str(), "\\");
        String ProgrDir = GetProgrammDirectory()+"\\reports";
        if (!DirectoryExists(ProgrDir)) {
            CreateDir(ProgrDir);
    }
        //имя файла, по которому составляется отчет
        String XmlName = lst->Strings[lst->Count-1];
        //отдельная папка для отчета
        String PatwayToReport = ProgrDir+"\\"+XmlName;
        if (!DirectoryExists(PatwayToReport)) {
            CreateDir(PatwayToReport);
        }
        free(lst);
        return PatwayToReport + "\\" + XmlName + "_" + type + "." + format;
 
}
 
//здесь я вызываю функции, приведенные выше
void __fastcall TForm1::MenuGetComplexClick(TObject *Sender)
{
/........................................../
 
        String SelectedXML;
        String SelectedXML_rep;
        for (int i=0;i<FilesList->Items->Count;i++) {
                if (FilesList->Selected[i]) {
                        SelectedXML = FilesList->Items->Strings[i];
                        SelectedXML_rep = FilesList->Items->Strings[i];
                }
        }
String filename = GetPathwayToReport(SelectedXML, "stability", "html");
//если подаю входным параметром SelectedXML, то получаю не совсем то, что ожидаю, т.к. SelectedXML - изменилась
filename = GetPathwayToReport(SelectedXML_rep, "chart_stability", "bmp");
}