![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
настройка кириллицы *.dbf-файла в BDE [D3, dBase, FoxPro]
novo © (2004-04-30 22:18:00)Есть *.dbf таблицы(FoxPro), поля которых содержат
кириллицу. В сессии DOS - никаких проблем.
В BDE, настраивая псевдоним никак не могу добится
корректного отображения русских шрифтов.
В настройке LANGDRIVER перепробовал все возможные
варианты, но никак.
Быть может поможет кто-нибудь?
Быть может нужно чере registry???
Буду благодарен за толковый совет.
novo (2004-05-12 11:39:00) [1]Спасибо огромное!
Под рукой не было ODBC VFP driver, поэтому
попробовал сразу совет kombata через настройки BDE Adm...
Configurations\Drivers\Native\FoxPro и dBase
- все работает как положено!
:)
Еще раз спасибо!
kombat (2004-05-12 10:52:00) [2]Я в BDE Administrator в закладке Configurations\Drivers\Native\FoxPro и dBase ставлю LangDriver = dBASE RUS cp866 и все работает.
Иногда, правда, приходится сбрасывать кодовую страницу для фоксовского файла и ставить 0 или 866. Но это редко. А при таких настройках и FoxPro и прога на Delphi нормально работают вместе (прога данные только читает)
sniknik (2004-05-12 10:41:00) [3]родные фоксовые таблицы неплохо открывает драйвер ODBC VFP driver, перекодировку для начала лутше совсем отключить.
novo (2004-05-12 10:14:00) [4]Высланная функция DosToWin(s: string): string;
перегоняет большинство символов, но далеко не все.
Вопрос к Anatoly Podgoretsky и всем, кому не трудно
помочь: как реализовать указанную выше фразу
"...только в дополнение еще и шрифты и транслитеризацию
полей" на деле?
Впервые столкнулся с такой проблемой :(
Пожалуйста, помогите
Anatoly Podgoretsky (2004-05-01 13:06:00) [5]Все тебе сказали, это и надо сделать, только в дополнение еще и шрифты и транслитеризацию полей.
novo (2004-05-01 12:29:00) [6]проблема в том, что это рабочая база FoxPro, а
через BDE мне нужно время от времени корректно
читать и обрабатывать данные через приложение
написанное в Delphi
Fedia (2004-05-01 05:22:00) [7]Попробуй перегнать таблицы, содержащие символы кирилицы через эту функцию.
function DosToWin(s: string): string;
var Source,Dest:array[0..255] of Char;
begin
SetLength(Result,Length(S));
if Length(Result)>0 then OemToAnsi(PChar(S),PChar(Result));
end;
Может быть поможет. Если нет, то извиняй.