Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.27;
Скачать: CL | DM;

Вниз

Помогите разобраться с кодировкой BDE   Найти похожие ветки 

 
Samsonov Yuric   (2003-01-04 11:02) [0]

Есть DBF таблица с текстовыми данными в которых есть украинские буквы. При просмотре програмами типа FoxPro, Norton Comander и аналогичными украинские буквы отображаються нормально. Если открывать таблицу в Delphi с помощью BDE украинские букві отображаются как бред. Как сделать так чтобы все было нормально.
Условия
1. Кодировка таблицы должна быть такой что бы она нормально смотрелась вышеуказанными програмами
2. При открытии таблицы не надо было делать перекодировку данных /таблица ОЧЕНЬ большая/ P.S. если перекодировка не ОЧЕНЬ сложная желательно подсказать


 
Jackal   (2003-01-04 12:45) [1]

Попробуй указать:
Font/Charset = OEMCharset
Font/Name = Arial


 
VICTOR_   (2003-01-08 19:49) [2]

Перекодировка буквы i

while Pos("і",s) > 0 do
begin
INSERT("i",s,Pos("і",s));
DELETE(S,Pos("і",s),1)
end;
while Pos("І",s) > 0 do
begin
INSERT("I",s,Pos("І",s));
DELETE(S,Pos("І",s),1)
end;


 
VICTOR_   (2003-01-08 19:51) [3]

Перекодировка 2

function ToUkr(s: String): String;
var u: Integer;
begin
u := StrPos("Ў", s);
while u <> 0 do begin s[u] := "І"; u := StrPos("Ў", s); end;
u := StrPos("ў", s);
while u <> 0 do begin s[u] := "і"; u := StrPos("ў", s); end;
Result := s;
end;


 
Соловьев   (2003-01-09 10:42) [4]

Я тоже столкнулся с такой проблемой. решил ее с помощью компонента TDatabase+ODBC. В ODBC менеджере предварительно настроил алиас.



Страницы: 1 вся ветка

Текущий архив: 2003.01.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
1-86791
alois
2003-01-18 05:31
2003.01.27
Как сделать плейлист


7-87167
wandp
2002-11-16 01:48
2003.01.27
Помогите с мышкой


1-86964
AndreiR
2003-01-17 11:24
2003.01.27
Как изменить цвет фришта в TDateTimePicker е?


3-86668
Anatoliy
2003-01-08 13:16
2003.01.27
Уважаемые мастера. Помогите пожалуйста с ADO+Access.


7-87177
Metallica
2002-07-29 20:31
2003.01.27
Как перехватить нажатие клавиш [Ctrl+Alt+Del], [Ctrl+Esc].