Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Вниз

Dos-Win кодировки. 


Sheva   (2002-02-21 12:17) [0]

Ув. мастера. помогите мне пожалуйста, уже три дня бьюсь над этой проблемой.

Я в своей програмке работаю с таблицами двух типов:
1. Старая фоксовская досовая таблица, условно, Table1;
2. Win-таблица под dbase4, Table2.

Возникает ситуация, когда я должен осуществлять поиск записи в Table1, по значению поля в Table2. Пишу такой код:

//st2 - string переменная, в Dos-кодировке.

Table2VKLNAME.AsString:= st2;

Table1.Open;
Table1.First;
for i:= 1 to Table1.RecordCount do
begin
st3:= Table1KOD.AsString;

if StrComp(Pchar(st2),Pchar(st3)) = 0 then
begin
Table1SROK.AsString:= Table2SROK.AsString;
Break;
end;
Table1.next;
end;
Table1.Close;

Так вот, все значения, которые в Table1 написаны латинскими буквами отрабатывает нормально, а русскими - не хочет перекодировать, или перекодирует неправильно. Перебробывал все, что мог. Помогите, пожалуйста, работа горит.



Sheva   (2002-02-21 12:22) [1]

Пробовал также OemToAnsi(PCahr(st2), PChar(st2)). У меня вроде бы все получилось, но когда перешел на другую машину, опять ничего не вышло.



Sheva   (2002-02-21 14:57) [2]

Никто не знает? Или неправильно построил вопрос? Подскажите хоть что-то, горю.



volodya_   (2002-02-21 15:58) [3]

В настройках BDE смотрел?



Sheva   (2002-02-21 17:16) [4]

Все перерыл. Но вот свершилось чудо. Наконец-то подобрал нужную кодировку, и все заработало. Два дня на такую фигню потратил.




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.024 c
3-66807           Борис                 2002-02-15 14:45  2002.03.21  
Какой тип базы данных выбрать?


3-66803           EN                    2002-02-23 01:42  2002.03.21  
Администрирование БД IB


3-66744           REL_                  2002-02-20 14:35  2002.03.21  
DBGrid


3-66724           dimich                2002-02-19 14:08  2002.03.21  
Как правильно используя Midas связать две таблицы


1-66934           Deadlock              2002-03-07 03:43  2002.03.21  
Drag in RT