Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 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]

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



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

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

Наверх





Память: 0.45 MB
Время: 0.006 c
1-66876
ДАААА
2002-03-03 17:02
2002.03.21
Ну очень рочно


14-67010
dip56245
2002-02-07 23:10
2002.03.21
pascal


6-66940
Vampire
2001-11-03 18:54
2002.03.21
А с помощью NMStrm можно как покет отправить пусковой файл??? И чтобы у получателя он естественно тут же запутился


3-66772
ilysha
2002-02-19 11:38
2002.03.21
Кто-нибудь работает с MySQL?


14-66960
maks_f
2002-02-05 10:33
2002.03.21
структура файла excel





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский