![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
БД в OEM [D6, dBase, FoxPro]
GIL © (2003-12-17 16:32:00)
возникла проблема: нужно одну базу скопировать в другую, с немного другим форматом и добавлением информации, вся проблема в том, что базы в кодировке OEM и я не могу по-нормальному вносить изменения (русский язык хромать начинает), что делать, и как решить эту проблему? или как-то конвертировать обычную кодировку в OEM? если да, то где найти процедуру конвертирования, или хотябы таблицу по которой конвертить?
GIL (2003-12-17 17:38:00) [1]
Спасибо Работает!! chartooem
Sandman25 (2003-12-17 17:24:00) [2]
OemToChar
CharToOem
Сам это использовал, когда надо было данные из TMemo записать в Blob поле на сервере с DOS-кодировкой, так чтобы DOS (точнее Unix) программы правильно работали.
DimonNew (2003-12-17 17:21:00) [3]
1. Конвертация.
пример из интернета как перевести из Windows строки в Dos строку.
// Функция Rus преобразует Windows строку в DOS строку}
function Rus(mes: string):string;
var
i: integer;
begin
for i:=1 to length(mes) do
case mes[i] of
"А".."п" : mes[i] := Chr(Ord(mes[i]) - 64);
"р".."я" : mes[i] := Chr(Ord(mes[i]) - 16);
end;
rus := mes;
end;
и соответсвенно наоборот.
2. Если у тебя есть BDE, то запусти BDE Administrator. Перейди на вкладку Configuration. Открой Drivers - Native и установи LangDriver соответствующего типа БД.
3. Если нет BDE, то в реестре HKEY_LOCAL_MACHINE\Software\Microsoft\Jet\4.0\Engines выбираешь нужный формат БД и попробуй поменять DataCodePage либо OEM либо ANSI.
Anatoly Podgoretsky (2003-12-17 17:15:00) [4]
Откуда куда?