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