Форум: "Базы";
Поиск по всему сайту: 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.058 c
7-67026           Snake                 2001-12-19 15:46  2002.03.21  
Как узнать дату выпуска BIOS?


14-66985          uuuu                  2002-02-07 23:33  2002.03.21  
Приветствую! Люди! помогите! как удалить файл из под делфи? Например c: windows kernel.3gh


4-67051           dimon                 2002-01-23 15:32  2002.03.21  
Календарь DateTimePicker-а в Delphi


1-66830           Gayrus                2002-03-07 16:20  2002.03.21  
Form s events


14-67002          savva                 2002-02-08 11:55  2002.03.21  
Кажется скоро буду еще вирусы... Готовьтесь :))