Проблемы с кодировкой в DBF

← →
lightix (2003-03-13 11:55) [0]

Есть необходимость закидывать информацию в файлы DBF FoxPro в кодировке 866. Поставил в БДЕ Langdriver=RUS CP866 для драйвера FOXPRO, при создании таблицы указываю тип ttFoxPro.
Вроде бы все ок, но некоторые программы вместо русских букв в DBF закидывают символы "#". Хотя некоторые программы формируют нормальные DBF-ы в нормальной кодировке.
И написано одинаково все. Например строка
Table1.FieldByName("A").AsString="ПРОВЕРКА123";
в одной программе запишет в DBF "ПРОВЕРКА123" ,
а в другой "########123" ....... Причем свойства таблиц и т.п. все одинаковые. Помимо TTable на форме имеются еще и TQuery, но они с этими файлами не работают,они работают с DBase DBF-ами.
Подскажите что делать.

← →
Alexandr © (2003-03-13 11:57) [1]

прописывай LangDriver не в BDE администраторе, а в своей программе.

← →
Anatoly Podgoretsky © (2003-03-13 12:07) [2]

lightix (13.03.03 11:55)
Что то не в порядке с этими программами.

← →
lightix (2003-03-13 12:50) [3]

А как в программе прописать LANGDRIVER ?
Программы одинаковые практически, только в той которая не работает есть еще и Query который с обычными табличками работает. Может она перекрывает как-то этот LANGDRIVER?

← →
Соловьев © (2003-03-13 12:55) [4]

TSession->TDatabase->TQuery

← →
Anatoly Podgoretsky © (2003-03-13 13:00) [5]

Одинаковые программы - одинаково работают

← →
lightix (2003-03-13 13:00) [6]

А можно пример, а то я что-то не пойму как можно таким образом задать свойства объекту

← →
lightix (2003-03-13 13:13) [7]

Что за TSession и TDatabase ?
у меня на форме есть только Table1
Как для него задать в программе LangDriver ????

← →
Соловьев © (2003-03-13 13:17) [8]

там где взял TTable посмотри остальное...

← →
lightix (2003-03-13 13:38) [9]

Ну нашел, поставил, подключил... А где LangDriver-то ?
Ни в TSession ни в TDataBase, ни в TTable такого не нашел :(
Расскажите кого к чему прицепить и чего сделать .. Плзззз...

Как всегда из хелпа:
var MyList: TStringList; begin MyList := TStringList.Create; try with MyList do begin Add("SERVER NAME=IB_SERVER:/PATH/DATABASE.GDB"); Add("USER NAME=MYNAME"); end; Session1.AddAlias("NewIBAlias", "INTRBASE", MyList); finally MyList.Free; end; end;

← →
lightix (2003-03-13 13:51) [11]

ну теперь понятно
только наврядли это мне поможет, т.к. я пробовал уже и в бде алиасы создавать и юзать таблицы через них.
А это в принципе то же самое, только алиас программно создается.
Все равно спасибо за помощь.

кто-то мне недавно здесь же скидывал

List:= TStringList.Create;
List.Add ("LANGDRIVER=dBase RUS cp866");
Session.ModifyDriver("DBASE",List);
List.Free;

← →
гончий (2003-03-14 08:57) [13]

Очень легко устанавливать любые параметры BDE при помощи компоненты TBdeConfig из пакета DegisyDb, кстати параметры можно устанавливать кучей :)

Проблемы с кодировкой в DBF Найти похожие ветки