Замена слов по словарю, Простейший переводчик Опции

[Незнакомец]

Здравствуйте. Не могли бы подсказать как сделать вот такую штуку: замешательство
в TMemo находится английский текст (например:

Hello world

), как сделать так чо бы считывать слова и вставлять их перевод в др мемо из файла-словаря?
В файле слова находятса в таком виде:


..................
hello привет
..................
..................
world мир
...............



И результат получался бы типа такого:

привет мир

[Н]

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

А как это сделать, можно пример?

[Malice]

А как это сделать, можно пример?

Как то вот так:

for i:=1 to КолвоСловВсловаре do
for j:=0 to memo1.Lines.Count-1 do begin
p:=1;
while p>0 do begin
sT:=memo1.Lines.Strings[j]; p:=pos(word[i].en,st);
if p>0 then
memo1.Lines.Strings[j]:=copy(st,1,p-1)+word[i].ru+ copy(st,p+length(word[i].en),255);
end; end;