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

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

Проблема с кодировкой [D7, XP]


allucard ©   (2007-11-12 16:10:00) 

Доброго времени суток.

Есть строка, принимаемая от устройства(через TComPort):
Воспринимаю её как string. Вывожу на форму.

Английские буквы и цифры нормально, а там где русские или украинские пишет каракули.

Подскажите как нормально отобразить украинские и русские буквы.

Спасибо.


allucard   (2007-11-12 17:30:00) [1]


> Правильный_Вася   (12.11.07 16:56) [7]

я не над одной переменной если ты об этом


allucard   (2007-11-12 17:03:00) [2]


> Правильный_Вася   (12.11.07 16:56) [7]

как правильно?


allucard   (2007-11-12 17:02:00) [3]

Type

TCONF = record
Currency: string[3];
Information: string[18];
identifier: string[4];
end;
.........        
conf.Currency := copy(s, 150, 3)         //s - это string
conf.Information := copy(s, 123, 18);
Conf.identifier  := copy(s, 78, 4);

OemToCharA(@conf.identifier, @conf.identifier);  //только в такой конфигурации нормально работает
OemToCharW(@conf.Information, @conf.Information);
OemToCharW(@conf.currency, @conf.currency);

Label1.Caption := conf.currency и т.д.


Правильный_Вася   (2007-11-12 16:56:00) [4]


>  Почему когда три раза подряд использую OemToChar второй
> и третий разы работает не правильно?

а почему log(5)<>log(log(5))<>log(log(log(5)))


Anatoly Podgoretsky   (2007-11-12 16:54:00) [5]

> allucard  (12.11.2007 16:46:05)  [5]

А не надо три раза или приводи более полный код.


allucard   (2007-11-12 16:46:00) [6]

1. Почему когда три раза подряд использую OemToChar второй и третий разы работает не правильно?

2. Какая разница между OemToChar, OemToCharA  и OemToCharW?

работает только так:

           OemToCharA(@conf.identifier, @conf.identifier);

           OemToCharW(@conf.Information, @conf.Information);

           OemToCharW(@conf.currency, @conf.currency);

?


Anatoly Podgoretsky   (2007-11-12 16:38:00) [7]

> Reindeer Moss Eater  (12.11.2007 16:19:02)  [2]

Вопрос, а есть ли украинская официальная кодировка под ДОС


allucard   (2007-11-12 16:36:00) [8]

Спасибо :)


Reindeer Moss Eater   (2007-11-12 16:19:00) [9]

CharToOem


Reindeer Moss Eater   (2007-11-12 16:19:00) [10]

OemToChar


Наверх

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