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

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

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

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

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

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

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

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


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

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


← →
Leonid Troyanovsky ©   (2005-08-25 10:16) [2]


> 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.



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

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



Память: 0.45 MB
Время: 0.027 c
1-1126025257
ДимДимыч
2005-09-06 20:47
2005.10.02
Аналог TActionList с дополнениями


1-1126167799
oradb
2005-09-08 12:23
2005.10.02
TListView, DblClick


1-1126187600
Maverick
2005-09-08 17:53
2005.10.02
Вызов немодальной формы из DLL.


1-1126003954
simpson
2005-09-06 14:52
2005.10.02
Динамический массив - константа


1-1126114537
integery
2005-09-07 21:35
2005.10.02
как превратить TStringGrid в TBooleanGrid




   Наверх