Хочу представить на ваш суд компонент, который позволяет переводить строки из одной кодировки в другую. По своему опыту знаю, что такого рода задачи встречаются очень часто, соответственно возникают проблемы с перекодировкой, так вот данный компонент позволяет их решить.
Далее хочу привести небольшой пример (подчеркиваю это всего лишь пример) использования этого компонента.
Итак, на форме имеем Label и button, пропишем обработчик событий Onclick на кнопке:
label1.Caption:= RusCod1.WinToKoi('программирование');
В нашем случаем мы преобразовываем текст из кодировки Win в кодировку KOI, а результат преобразования выводим в Label.
В принципе все просто ! Более того в архиве есть Демо так что тут грех не разобраться.
Поддерживаемые кодировки: WIN, DOS, KOI, ISO
Установка: Распаковываем скаченный архив, в главном меню Delphi нажимаем Component - Instal Component. В появившемся окне, в первой строчке (Unit File Name) указываем полный путь к файлу RUSCOD.PAS. Жмем Ok и компонент успешно устанавливается.
| 