ФайлДБФ=Новый Xbase;
ФайлДБФ.ОткрытьФайл(путь,,Истина);
ФайлДБФ.Кодировка = КодировкаXBase.ANSI;
сообщить("Количество строк "+ФайлДБФ.КоличествоЗаписей());
ФайлДБФ.Первая();
пока не ФайлДБФ.ВКонце() цикл
если не ФайлДБФ.ЗаписьУдалена() тогда
сообщить(файлдбф.pol_naim);
конецесли;
ФайлДБФ.Следующая();
конеццикла;
Выводит кодировку абракадабра, а если поставить oem, то вообще на взгляд еще хуже становится с черточками. как получить правильный тект? Просмотрщик visual foxpro 9 видит хорошо.
(6) решил, спасибо поменял формат региона на русский.
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой