Работа с функциями из потоков (Thread)

MyThread **Thr = new MyThread*[2]; 
for(int i = 0; i < 2; i++)
{
    Thr[i] = new MyThread(true);
    Thr[i]->Priority = tpHigher;
    Thr[i]->FreeOnTerminate = true;
    Thr[i]->Start();
    Application->ProcessMessages();
}

String Translate(String text)
{
    String ret;
    String rus[75]=
    {
        "А", "а", "Б", "б", "В", "в", "Г", "г", "Ґ", "ґ", "Д", "д", "Е", "е", "Є", "є", "Ж",
        "ж", "З", "з", "И", "и", "І", "і", "Ї", "ї", "Й", "й", "К", "к","Л", "л", "М", "м",
        "Н", "н", "О", "о", "П", "п", "Р", "р", "С", "с", "Т", "т", "У", "у", "Ф", "ф",
        "Х", "х", "Ц", "ц", "Ч", "ч", "Ш", "ш", "Щ", "щ", "Ь", "ь", "Ю", "ю", "Я", "я", "Ы",
        "ы", "Ъ", "ъ", "Ё", "ё", "Э", "э", " "
    };
 
    String eng[75]=
    {
        "A", "a", "B", "b", "V", "v", "G", "g", "G", "g", "D", "d", "E", "e", "E", "e", "Zh",
        "zh", "Z", "z", "I", "i", "I", "i", "Yi", "yi", "J", "j", "K", "k", "L", "l", "M",
        "m", "N", "n", "O", "o", "P", "p", "R", "r", "S", "s", "T", "t", "U", "u", "F", "f",
        "H", "h", "C", "c", "Ch", "ch", "Sh", "sh", "Shh", "shh", "", "", "Ju", "ju","Ja",
        "ja", "Y", "y", "", "", "Jo", "jo", "Je", "je", "_"
    };
    bool find=false;
    for(unsigned int i = 1; i <= text.Length(); i++)
    {
        find=false;
        for(int j = 0; j < 75; j++)
        {
            if( text.SubString(i,1).Compare(rus[j].c_str()) == 0 )
            {
                ret += eng[j].c_str();
                find=true;
                break;
            }
        }
        if( !find ) ret += text.SubString(i, 1);
    }
    text = "";
    return ret.c_str();
}

if( text.SubString(i,1).Compare(rus[j].c_str()) == 0 )

text.SubString(i,1).Compare(rus[j].c_str()) == 0

map<String, String> trans;

const int rus_size= 75;
String rus[rus_size]= { /* ... */ }

const int rus_count = 75;
const int eng_count = 75;
 
String Translate(String text)
{
    char rus[rus_count] =
    {
        'А', 'а', 'Б', 'б', 'В', 'в', 'Г', 'г', 'Ґ', 'ґ', 'Д', 'д', 'Е', 'е', 'Є', 'є', 'Ж',
        'ж', 'З', 'з', 'И', 'и', 'І', 'і', 'Ї', 'ї', 'Й', 'й', 'К', 'к','Л', 'л', 'М', 'м',
        'Н', 'н', 'О', 'о', 'П', 'п', 'Р', 'р', 'С', 'с', 'Т', 'т', 'У', 'у', 'Ф', 'ф',
        'Х', 'х', 'Ц', 'ц', 'Ч', 'ч', 'Ш', 'ш', 'Щ', 'щ', 'Ь', 'ь', 'Ю', 'ю', 'Я', 'я', 'Ы',
        'ы', 'Ъ', 'ъ', 'Ё', 'ё', 'Э', 'э', ' '
    };
 
    String eng[eng_count] =
    {
        "A", "a", "B", "b", "V", "v", "G", "g", "G", "g", "D", "d", "E", "e", "E", "e", "Zh",
        "zh", "Z", "z", "I", "i", "I", "i", "Yi", "yi", "J", "j", "K", "k", "L", "l", "M",
        "m", "N", "n", "O", "o", "P", "p", "R", "r", "S", "s", "T", "t", "U", "u", "F", "f",
        "H", "h", "C", "c", "Ch", "ch", "Sh", "sh", "Shh", "shh", "", "", "Ju", "ju", "Ja",
        "ja", "Y", "y", "", "", "Jo", "jo", "Je", "je", "_"
    };
    String ret("");
    bool find(false);
    for(int i = 1; i <= text.Length(); i++)
    {
        find = false;
        for(int j = 0; j < rus_count; j++)
        {
            //if( text.SubString(i,1).Compare(rus[j].c_str()) == 0 )
            if(text[i] == rus[j])
            {
                ret += eng[j];
                find = true;
                break;
            }
        }
        if(find == false)
        {
            ret += text[i];
        }
    }
    text = "";
    return ret;
}

if(text[i] == rus[j])
{
    ret += eng[j];
    find = true;
    break;
}

char rus[rus_count] =

wchar_t rus[rus_count] =
{
   L'А', L'а' 
   // ...

EnterCriticalSection(&Form1->CS);
...
LeaveCriticalSection(&Form1->CS);