Как конвертнуть 'UnicodeString' to 'char *'??? - C++ Builder - Ответ 7442512

#include <vcl.h>
#include <dir.h>
#include <stdio.h>
#include <FileCtrl.hpp>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainForm *MainForm;
 
char *find_path_dir;
//---------------------------------------------------------------------------
void find_in_file(String file_name)
{
    AnsiString *st;
    String full_path; //полный путь до файла
    int hendl_file; //дескриптор файла
    int word_n; //количество прочитанных байт
    int len; //длина строки
    char buf[51200]; //cтрока(буфер)
    unsigned char *p = buf; //указатель на строку
    char *str_find; //подстрока поиска
 
    //дописываем к имени файла полный путь
    //для последующего открытия
    full_path = MainForm->Path_Dir->Text + "\\" + file_name;
    //str_find = StringToWideChar(MainForm->Find_Word->Text, str_find, 10);
    str_find = MainForm->Find_Word->Text.c_str();
    hendl_file = FileOpen(full_path, fmOpenRead);
    if (hendl_file == -1)
    {
        ShowMessage("dsdf");
    }
    else
    {
        word_n = FileRead(hendl_file, p, 1);
        while (word_n != 0)
        {
            if (*p == '\r')
            {
                word_n = FileRead(hendl_file, p, 1);
                break;
            }
            len++;
            p++;
            word_n = FileRead(hendl_file, p, 1);
        }
         *p = '\0';
         if (len != 0)
         {
            if (strstr(buf, str_find))
            {
                //если находим совпадение, то добавляем в список
                MainForm->FileListResult->Items->Add(file_name);
            }
            st->printf("%s", buf);
         }
    }
}
//---------------------------------------------------------------------------
void scan_dir(String dir, String maska)
 
{
    TSearchRec SR;
    int find_rez;
    find_rez = FindFirst(dir + "\\" + maska, faAnyFile, SR);
    if (find_rez == 0)
    {
        while (find_rez == 0)
        {
            if (((SR.Attr && faDirectory) == faDirectory) &&
            ((SR.Name == ".")||(SR.Name == "..")))
            {
                find_rez = FindNext(SR);
                continue;
            }
            // если найден каталог, то
            if ((SR.Attr && faDirectory) == faDirectory)
            {
                // входим в процедуру поиска с параметрами текущего каталога +
                // каталог, что мы нашли
                find_rez = FindNext(SR);
                // после осмотра вложенного каталога мы продолжаем поиск
                // в этом каталоге
                continue; // продолжить цикл
            }
        //если нашли файл по маске расширения, то кидаем в процедуру обработки
        //поиска по ключевику
        find_in_file(SR.Name);
 
        //переходим к новому файлу
        find_rez = FindNext(SR);
        }
    FindClose(SR);
    }
}
 
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::ChoiseDirClick(TObject *Sender)
{
    String path = "";
    if (SelectDirectory("Директория поиска","",path))
    {
        MainForm->Path_Dir->Text = path;
    }
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::Find_BtnClick(TObject *Sender)
{
    //при необходимости очищаем список найденных файлов
    if (MainForm->FileListResult->Count != 0)
    {
        MainForm->FileListResult->Clear();
    };
 
    if (MainForm->Path_Dir->Text != "")
    {
        //вызывае процедуру поиска файлов по маске в каталоге
        scan_dir(MainForm->Path_Dir->Text.c_str(), "*.xml");
    }
    else
    {
        MessageDlg("Не выбран каталог!", mtError, TMsgDlgButtons() << mbOK,  0);
    }
}
//---------------------------------------------------------------------------