Переводчик - не так всё просто!

Запись от Pioner_ размещена 14.05.2015 в 20:11

Показов 1771 Комментарии 1

Здравствуйте достопочтенные форумчане очень полезного сайта!

Задумал сделать переводчик...но вот, столкнулся с массой проблем)
оказалось не так то просто сравнить слова и заменить их аналогом из
переводимых слов...тем более если язык интуриста английский...где одно
слово может иметь много значений...да и склонением слов у них не порядок
какой то...ну болт с ними) переходим к моей просьбе...

Прошу помочь с алгоритмом сравнение...у меня RAD XE5

вот кусок кода...сокращенно:

Delphi
1
2
3
4
5
6
7
8
9
10
s1 := {разделенный слово из Memo1}
s2:=  Parse(ch,ListBox1.Items[j],1);
s3 :=  Parse(ch,ListBox1.Items[j],2);
   
 if  AnsiCompareText(Trim(s1), Trim(s2))= 0 then  
 
    {если совпадает s1 и s2  то заменяем на s3 } 
 
Memo2.Text := StringReplace( Memo2.Text,s1,s3,[rfReplaceAll]); 
{ну или s1 := s3 }

И вот как переводить:- с анг. на русский, пока нормально)

пример1
hi! my ....dear!

привет! мой(я) ....дорогая !

------------------------------------
с русского на англ. ...в упор не видит некоторые слова)

пример2

привет! мой(я) ....дорогая!

hi! мой(i) ....дорогаi!
-------------------------------------------
В чем тут проблема? надо сказать пробовал разные
варианты начиная от простого сравнения и Pos
результат почти одно и тоже...

И да, очень прошу у кого есть ссылки или примеры
на нормального переводчика... ну или примеры алгоритма
подайте бедному любителю делфи) а то в инете что бы
найти хоть что то полезное приходится тонны макулатуры
переворачивать...

Спасибо тем кто откликнется по первой же просьбе!

Размещено в Без категории

Главная страница

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

Всего комментариев 1

Комментарии

	Надо было просто AnsiReplaceStr))
	Запись от Pioner_ размещена 14.05.2015 в 20:28

Pioner_

Регистрация 09.09.2014
Сообщений 54
Записей в блоге 1

Новые блоги и статьи Все статьи Все блоги /
Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .	Лето уходит kumehtar 17.08.2026	Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .
Перемещение строк из ТЧ в другой документ с учетом текущего пробега Maks 17.08.2026 Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .	Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .	Часы с будильником на основе класса QLCDNumber Uhbif79 12.08.2026 Всем добрый день, выкладываю программу часов с будильником на основе класса QLCDNumber. Здесь я пробовал самостоятельно создавал классы, впервые столкнулся с видимостью переменной одного класса из. . .

Наверх

Сообщение форума

Отменить изменения