Работа с memo.

← →
benn © (2005-08-24 15:24) [0]

У меня есть memo, там записан текст, мне нужно, чтобы прога искала из этого текста некоторые слова и предложения:
Пример:
В мемо написанно:

"Конференция для начинающих, а также для тех, кому сложно объяснить чего он хочет.
Просьба к участникам быть взаимовежливыми, профессионалам отдельная просьба - быть снисходительными."

Мне нужно, чтобы прога искала слово "сложно", затем копировала мне в строковую переменную 4 слова, стоящие за этим словом("объяснить чего он хочет").
Затем, чтобы во вторую переменную прога записывала все, что в первой переменной, исключая второе слово и четыре символа, стоящих за словом "он"(при этом длинна и кол-во слов не известны)
И в третью переменную записывала координаты этих слов в мемо(типа № столбец, №№ строка), чтобы потом по этим координатам я снова мог обратиться в мемо.
Еще мне нужно, чтобы в четвертую переменную, прога записывала допустим восьмое слово + с 5 по 12 символ во второй строке из мемо.
Как это можно сделать?

Дайте так же ссылку, где можно почитать все эти нюансы(вообще, что можно делать) с мемо и строковыми типами на русском языке

Заранее спосибо!

← →
benn © (2005-08-24 23:00) [1]

Народ что никто не знает чтоли?
По идее это все просто, просто я уже давно в Делфи не работал и все позабыл...

> benn © (24.08.05 23:00) [1]
> Народ что никто не знает чтоли?
> По идее это все просто, просто я уже давно в Делфи не работал
> и все позабыл...

Для позабывших есть Delphi help, скажем,
VCL Reference Copy, Chr, SelStart, SelLength example.

Единственное затруднение могло бы быть с определением
номера строки и индекса некоторого символа (скажем, в Text),
но и это оч.просто:

var Linenum, Charnum: Longint; .. with MemoX do begin {ich -character index (zero-based)} Linenum := Perform(EM_LINEFROMCHAR, ich, 0); Charnum := ich - Perform(EM_LINEINDEX, Linenum, 0); end;

--
Regards, LVT.

Работа с memo. Найти похожие ветки