Embarcadero 10.2
Пишу в TMemo содержимое поля из БД Access:

авторMemo1.Text=fdqSqlQueryQUERY->AsString;

Memo1 - из Standart палитры компонентов TMemo;

fdqSqlQueryQUERY - поле из таблицы БД Access (mdb файл) типа ftWideMemo.

В Memo1 появляется только 1-й символ из содержимого поля.

Я так понимаю, что 2-й байт двухбайтного символа в UNICODE кодировки содержит 0, что для TMemo
является концом строки.

По их заявлениям в Embarcadero 10.2 все компоненты по умолчанию должны поддерживать UNICODE кодировку.

Как заставить TMemo принимать строки в UNICODE кодировке в Embarcadero 10.2?

wadmanКомпонент поля тип TWideStringField? AsWideString что дает?

AsWideString также как и AsString возвращают UnicodeString.

Причем в TDBGridEh это поле отражается правильно, но в TMemo никак не передать содержимое UnicodeString.

AriochMemo1.Lines.Text := ... ?
Memo1.Lines.Text := fdqSqlQueryQUERY->AsString;
дает такой же эффект как и
Memo1.Text := fdqSqlQueryQUERY->AsString;

то есть выводится только 1-й символ.

DarkMasterВ Memo.Font.CharSet ничего не накручено? Если сделать ShowMessage(Query.AsWideString) - текст виден?
В Memo.Font.CharSet стоит DEFAULT_CHARSET.
В ShowMessage() выводится также только 1-й символ.

Если написать:
String sss="Это WideString строка";
ShowMessage(sss);

то вывод нормальный.

Значит проблема не TMemo, а в представлении поля fdqSqlQueryQUERY.AsString типа ftWideMemo
из БД Access, хотя в DBGridEh это поле выводится нормально.

fdqSqlQueryQUERY.AsString возвращает строку UnocodeString.

Проблема решилась.

Было неправильно создано поле TWideMemoField (скопировал его со старого проекта).
Я удалил его и пересоздал заново из подключенной БД Access. Все заработало.

Всем спасибо за участие.