Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вытащить часть текста из Memo


Страницы:   1 2 3

Демерго ©   (2010-12-01 13:54:00) 

Всем привет!

Я хочу вытащить часть текста из Memo. Например:

Тест "Сегодня_хорошая_погода" и надо вытащить слово между "Сегодня_" и "_погода" и вставить в Edit. то есть чтобы текст в Edit = "хорошая".

Заранее большое спасибо!


Ega23   (2010-12-01 14:27:00) [41]


> Проще говоря я могу задать уникальные А и Б между которыми
> надо вырезать текст


два раза Pos, один раз Copy. Справку по обеим функциям можно вызвать по F1


Демерго   (2010-12-01 14:26:00) [42]

а в твоем примере должно получится 2222 Привет


Демерго   (2010-12-01 14:24:00) [43]

В моем тексте только один раз встречается Привет</td><td style="width:40%; text-align:left;">

Проще говоря я могу задать уникальные А и Б между которыми надо вырезать текст


Ega23   (2010-12-01 14:23:00) [44]

Вот строка.

Привет</td><td style="width:40%; text-align:left;">2222 Привет</td><td style="width:40%; text-align:left;">1</td> </td>

Что у тебя должно получиться?


Демерго   (2010-12-01 14:20:00) [45]

то есть вырезанный текст должен быть = 1


Демерго   (2010-12-01 14:18:00) [46]

To Ega23:

Вот конкретный пример:

Привет</td><td style="width:40%; text-align:left;">1</td>

Мне нужно вытащить текст между Привет</td><td style="width:40%; text-align:left;">и </td>


Медвежонок Пятачок   (2010-12-01 14:16:00) [47]

я умею писать простенькие программы по примерам. не просто "скопировать код"

В том смысле что не пользуешься (не умеешь?) буфером обмена, а переписываешь примеры?


Медвежонок Пятачок   (2010-12-01 14:14:00) [48]

ну замечательно.
выучи еще пару функций (что выше) и все будешь знать.


Ega23   (2010-12-01 14:14:00) [49]


> Ситуация такая что я знаю слово А и слово Б и мне надо вытянуть
> текст который находится между этими словами.


Тебе весьтекст нужен?
А если у тебя 2 раза такое сочетание встречается?
А если эти сочетания вложенные?

Например, слово А и Б:

123А ппп Блтвыалт А А Аолдтлыфвтмапшрт Б Б Бвввв   АААБББ


Демерго   (2010-12-01 14:13:00) [50]

я умею писать простенькие программы по примерам. не просто "скопировать код", а понять как оно работает и приспособить под свои нужды.


Медвежонок Пятачок   (2010-12-01 14:12:00) [51]

Дело в том что я никакие курсы не посещал, самоучка.

А чего ты самоучка?
Что именно успел самовыучить?


Демерго   (2010-12-01 14:11:00) [52]

Дело в том что я никакие курсы не посещал, самоучка. Надеюсь на пример кода.

Ситуация такая что я знаю слово А и слово Б и мне надо вытянуть текст который находится между этими словами.


Медвежонок Пятачок   (2010-12-01 14:10:00) [53]

Можно проще.

Edit1.Text := 'фиговая';
Memo1.Lines.text:= 'Сегодня_' + Edit1.Text + '_погода';


Ega23   (2010-12-01 14:04:00) [54]

1. Определиться, что такое "слово".
Набор символов, разделённых пробелом?
Набор символов, разделённых пробелом или спец.символами?
Набор символов, разделённых пробелом, спец.символами и знаками препинания?
Какой именно набор символов? "12пп45" - это слово или нет?

Ну а дальше разбить текст (Memo.Text) на массив "слов" и найти в нём разницу.
Второе - элементарная задачка для первого курса.
А вот с первым блоком - сложнее.


Palladin   (2010-12-01 14:02:00) [55]

... и функция Copy вместе с ней


Palladin   (2010-12-01 14:01:00) [56]

функция Pos обычно изучается еще в школе...


Страницы:   1 2 3

Наверх

Титульная страница Поиск, карта сайта Написать письмо