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

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

перекодировка ; hello <-> руддщ [D5]

elk ©   (2002-01-09 13:24:00) 

Всем добрый день!

подскажите каким образом можно перекодировать
руддщ в hello
(без использования таблиц соответствия символов)

---

DelGod   (2002-01-10 01:48:00) [1]

2SuperMama&Stexen
какой смысл уже исходник кидать если вся изуминка моего исходника чуть выше[смотри - DelGod(09.01.02 17:39)]

тут вот уже завязалась дискусия поинтересней у Anatoly Podgoretsky и Андрея Сенченко

---

Anatoly Podgoretsky   (2002-01-09 22:42:00) [2]

Андрей Сенченко © (09.01.02 21:00)
Конечно растояние разное и не стоит никогда делать на каких то особенностях той или другоий кодировки, а такое часто встречается, лучше потратить некоторое количество байт и иметь универсальную вещь. То есть перекодировка по таблицам и общая универсальная функция.

Stexen © (09.01.02 22:16)
У кого и какой исходник просишь?

---

Stexen   (2002-01-09 22:16:00) [3]

мне тоже исходник скиньте

---

Андрей Сенченко   (2002-01-09 21:00:00) [4]

> Anatoly Podgoretsky © (09.01.02 20:41)
Анатолий ! Насколько я помню, по-моему Вы говорили, что писали универсальный переводчик из одной кодировки в другую. Если так, то может знаете - во всех ли кодировках "расстояние" между кодами символов одинаково ?
имеется в виду, что
chr("q")-chr("й")
во всех ли общеупотребимых кодировках будет иметь одно значение ?
Тогда можно предложить еще один вариант

---

Anatoly Podgoretsky   (2002-01-09 20:41:00) [5]

Вадим © (09.01.02 14:50)
Можно, но не нужно

if .. = "q" then .. := "й"
else if .. = "w" then .. := "ц"
...


---

DelGod_   (2002-01-09 17:39:00) [6]

asd1:="qwertyuiop[]asdfghjkl;zxcvbnm,./\QWERTYUIOP{}ASDFGHJKL:"ZXCVBNM?|`1234567890-=~!@#$%^&*()_+ """;
fcl1:="йцукенгшщзхъфывапролджячсмитьбю.\ЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЭЯЧСМИТЬБЮ,/ё1234567890-=Ё!"№;%:?*()_+ э";

и вся таблица, а потом

for i:=1 to length(vod) do
for j:=1 to 60 do
if vod[i]=asd1[j] then vuvod:=vuvod+fcl1[j];

и всё

---

SuperMama   (2002-01-09 15:51:00) [7]

>>> DelGod_
СКИНЬ МНЕ ИСХОДНИК ПЛЗ...
IronHawk@ukrpost.net
заранее благодарен ...

---

Вадим   (2002-01-09 15:28:00) [8]

2DelGod_

Без таблиц?

---

DelGod_   (2002-01-09 15:00:00) [9]

Я писал прогу(для себя) которая это и делает, сидит в трее при нажатии Ctrl+Alt+Num0 она перекодирует текст в буфере с "ghbdtn" в "привет"
если тебе нужно то могу кинуть тебе исходник

---

Vovchik   (2002-01-09 14:51:00) [10]

А почему без таблиц?

---

Вадим   (2002-01-09 14:50:00) [11]

>без использования таблиц соответствия символов

Никак!

---

Наверх