Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

БД в 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]

Откуда куда?


Наверх

Титульная страница Поиск, карта сайта Написать письмо