Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Информационный Канал Subscribe.Ru

Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 04.03.03 09:04

Кое-что из нашей кладовки   |x|
Лучшее из нашего FAQ   |x|
Принцип смены кодировок (Ansi<>OEM). А как можно определить кодировку у текста? (программно)
Перекодировать можно по разному.
1. Привести текст к windows кодировке и показать.
Для этого можно пользоваться своими процедурами на основе таблицы перекодирования. Или воспользоваться стандартными WinAPI, но таких только для DOS <--> Win.

BOOL OemToChar(
   LPCTSTR lpszSrc, // pointer to string to translate  
   LPSTR lpszDst  // pointer to translated string
  );

Т.е. это что-то вроде:
Var
p1, p2  : PChar;
begin
. . .
if (CharToOem(p1, p2)) then ...;
. . .

В итоге, в p2 нормальный текст. Одна беда, что все фнукции WinAPI работают с форматом PChar а не String. Но у Delphi ест ьнабор функций для пребразования туда обратно. Сам найдешь. И не забывай, что для pchar сначала нужно выделить память, а потом ее освободить.

2. Использовать нужный шрифт для показа текста. В этом случае вообще не! надо ничего кодировать. Одна проблема, если этот текст скопировать в буфер обмена и вставить, например в блокнот, то он вставится не перекодированный. Опять же, для DOS можно исп. шрифт Terminal. А также есть и шрифты для koi-8 !!! Не в стандартной поставке windows, но в инете найти можно.

Что касается, определить кодировку. Это сложно. Обычно для этих целей создается база с наиболее часто употребляемыми словами и потом текст сравнивается на наличие таких слов. Например, предлог "как" в кодировке koi-8 выглядит "ЛБЛ". Понятно, что такое словосочетание вряд ли будет в нормальном тексте (хотя и возможно), отсюда можно заключить, что это текст в кодировке koi-8.

Для koi-8, еще можно исп. тот факт, что все маленькие буквы становятся большими, а большие маленькими. Т.е. все предложения начинаются с маленькой буквы, а дальше большие, то можно сказать, что это koi-8.

Коментарий: Сергей Истомин
если есть уверенность в том, что кодировка ли! бо OEM либо ANSII, то определить OEM можно по наличию в тексте некоторых символов, которых нет в ANSII:

if(byte>=0x80 && byte<=0xA7) return OEM;
if(byte>=0xA9 && byte<=0xAF) return OEM;

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Мир Borland Kylix. Обработка событий Qt в Kylix-приложении.
В предыдущей статье было описано обращение к методам объектов Qt library из программ, написанных на языке Object Pascal. В этой статье будет рассмотрена обработка событий Qt и создано демонстрационное приложение.
Новинки книжного рынка   |x|
Самоучитель Kylix
Книга посвящена новому продукту фирмы Borland - объектно-ориентированной среде для быстрой разработки приложений под Linux. Рассматривается версия Kylix 1.0 Server Developer.
Приводятся приемы работы с графическими компонентами, принципы создания приложений баз данных и собственных компонентов.
Дается краткое описание языка программирования Object Pascal. Последняя часть книги посвящена проблеме создания межплатформенных приложений, которые работают как в среде Linux, так и в Windows.
Изложение сопровождается многочисленными примерами и фрагментами кода.Для программистов

Автор: Понамарев В.
Другие сайты о DELPHI   |x|
DelphiCity
Открылся новый сайт, посвященный исключительно компонентам, библиотекам и инстpументам для Delphi и C++ Builder. От себя заметим, что сайт в самом деле достоен, чтобы его посетили, а приятный дизайн, ...

» Оценка сайта: 5
Опрос населения :)
Какой сайт по Delphi лучший?
»»» Королевство Дельфи
»»» Этот сайт
»»» Дельфи. Вокруг да около
»»» Другой
»»» Чем больше, тем лучше!
Журнал "RSDN Magazine"  |x|

Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.

Для души

Хокку дня
Какая прохлада!
Сквозь набежавший ливень
Закатное солнце.

Афоризмы
Я стал полицейским, потому что с детства мечтал о профессии, в которой клиент всегда не прав

Фраза дня
Разговаривают две женщины о мужьях:
- Сначала он бросил пить, потом он бросил курить, потом он бросил меня...

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Калифорнии (США) есть закон, гарантирующий жителям штата право загорать на солнце.
В Аризоне (США) считается преступлением отказать человеку в просьбе дать стакан воды. В этом же штате незамужним женщинам запрещается рыбачить в одиночку. Если женщина замужем, она может ходить на рыбалку одна только по воскресеньям.

И на закуску коротенький анекдот
Проект 21 века! Эстонцы переписывают китайцев.

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=54


На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное