Реализация синтеза речи

    //           Разбивание строки
    AnsiString ss = Memo1->Text;string s = ss.c_str();
    string d = " ,.;!<>|/\\+-=()^%$#@!~&*:{}"; vector<wstring> v;
    int b, e = 0;
    while ((b = s.find_first_not_of(d, e)) != s.npos)
    {
        e = s.find_first_of(d, b);
        v.push_back(toWideChar(s.substr(b, e - b)));
        b = e;
    }
    for (wstring text : v) // итерация по массиву v
        ListBox1->Items->Add(text.c_str());

    //           Поиск названия файлов
    WIN32_FIND_DATAW fd;
    vector<wstring> filenames;
    HANDLE hFind = FindFirstFileW(L"Alphavit\\*.*", &fd);
    if (INVALID_HANDLE_VALUE != hFind)
    {
        do
        {   filenames.push_back(&fd.cFileName[0]);
        } while (FALSE != FindNextFileW(hFind, &fd));
                FindClose(hFind);
    }
    filenames.erase( filenames.begin() + 0, filenames.begin() + 2);                  //удаление первых элементов, которые не содержат буквы
/*----------------------------------------------------------------------------*/
    for(size_t i =0; i < filenames.size(); ++i )
    {
    //           Удаление расширений файлов
        wstring::size_type npos1 = filenames[i].rfind (L".");
        if(npos1 != std::wstring::npos)
        {   wstring::size_type npos2 = filenames[i].length();
            filenames[i].erase(npos1,  npos2-npos1);
        }
    }

sort(filenames.begin(), filenames.end());

#include <iostream>
#include <string>
#include <vector>
#include <algorithm>
 
int main()
{
    std::locale::global(std::locale{ "" });
 
    std::vector<std::string> file_names{ "б", "у", "улок", "бул", "лок", "ок" };
    std::sort(file_names.begin(), file_names.end(), [](auto const& lh, auto const& rh) { return lh.length() > rh.length(); });
 
    std::string word{ "булок" };
    std::cout << word << std::endl;
 
    for (size_t i{}, w_sz{ word.size() }; i < file_names.size() && w_sz; ++i)
    {
        std::cout << '[' << i << ']' << file_names[i] << std::endl;
 
        if (file_names[i].length() > w_sz) continue;
        auto sub = word.find(file_names[i]);
        if (sub != std::string::npos)
        {
            std::string idx{ '[' + std::to_string(i) + ']' };
            word.replace(sub, file_names[i].length(), idx);
            w_sz -= file_names[i].length();
        }
    }
    std::cout << word << std::endl;
}