Вниз
Скачать: CL | DM;

Транслит   Найти похожие ветки 

← →
BlackLord2003 ©   (2004-02-03 09:40) [0]

Мне очень нужно встроить транслит в прогу. Может кто знает как это сделать. Может есть какие компоненты для этого. Только для транслита, а не для исправления раскладки! Заранее благодарен!


← →
TUser ©   (2004-02-03 10:37) [1]

А что такое транслит. Правда, интересно.


← →
snake1977   (2004-02-03 10:43) [2]

Если я тебя правильно понял, то сделай так
делаеш константу типа
Const table:Array[1..66,1..2] of String[2]=
(("а","a"),......,("Я","ya"));
а далее что то типа такой вот функции

Function Rus2Trans(source:String):string;
Var i,j:Integer;
Begin
Result:="";
for i:=1 to Length(source) do
Begin
for j:=1 to 66 do
if table[j,1]=source[i] Then result:=result+table[j,2];
End;
End;


← →
Nikolay M. ©   (2004-02-03 10:45) [3]

Гораздо интереснее узнать, каким образом автор представляет себе "встраивание" транслита в "прогу" :)


← →
jack128 ©   (2004-02-03 10:50) [4]


> BlackLord2003 © (03.02.04 09:40)
тебе нужно с русского в транслит перевести? тогда
> snake1977 (03.02.04 10:43) [2]
. А вот если с транслита на русский, то возможны проблемы.Каждый же транслитет как хочет ;-)


> TUser © (03.02.04 10:37) [1]
Ya pishy na traslite


← →
TUser ©   (2004-02-03 11:06) [5]

Ух ты. Не знал, что оно так называется. Но прогу такую недавно писал. Могу выслать, как только вылечу свой комп.


← →
REP ©   (2004-02-03 11:08) [6]

Где-то встречал таблицу транслита (она не соответствует международной), по ней можно было однозначно переводить из латиницы в кирилицу и обратно. Однако читается там тяжелей. буква "h" вспомогательная и в зависимости от того, какая буква стоит после нее определяется русская буква.
Только я ее потерял.


← →
Anatoly Podgoretsky ©   (2004-02-03 11:30) [7]

И в какую сторону транслит


← →
TUser ©   (2004-02-03 11:43) [8]


> однозначно переводить из латиницы в кирилицу и обратно

Однозначно? А как быть с переводом русского "ф" и английского "th"?


← →
Anatoly Podgoretsky ©   (2004-02-03 11:46) [9]

REP © (03.02.04 11:08) [6]
Задача не имеет полного решения, тебя обманули.


← →
BlackLord2003 ©   (2004-02-03 14:07) [10]

Уже нашёл. Тут в кладовке есть юнит для работы со строками. Там есть то что мне нужно.



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.026 c
14-39098
Ig
2004-01-20 00:52
2004.02.13
Регистрация или что-то еще?


11-38762
Кладов
2003-05-27 21:47
2004.02.13
Версия 1.74 дождалась своего часа (в смысле моего отпуска)


6-38989
Exciter
2003-12-11 14:28
2004.02.13
Как ужнать, что машина вошла в НЭТ.


3-38705
чайник1
2004-01-22 14:19
2004.02.13
Access violation


3-38709
Pul
2004-01-15 13:38
2004.02.13
UDF Interbase




   Наверх