Универсальное и простое решение для смены кодировки из Ansi в Utf8 служит функция AnsiToUtf8().
Пример №1
AnsiString kod;
kod = RichEdit1->Text;
Edit1->Text = AnsiToUtf8(RichEdit1->Text);
Пример №2
Memo1->Text= AnsiToUtf8((AnsiString)Memo1->Text);
Универсальное и простое решение для смены кодировки из Ansi в Utf8 служит функция AnsiToUtf8().
Пример №1
AnsiString kod;
kod = RichEdit1->Text;
Edit1->Text = AnsiToUtf8(RichEdit1->Text);
Пример №2
Memo1->Text= AnsiToUtf8((AnsiString)Memo1->Text);