Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Как получить текст между определенных символов?

Автор: Foux 27.5.2008, 10:11

Уже две недели бьюсь над проблемой:

Как получить текст между определенных символов. Например:
текст в тегах <title>Текст который нужно получить</title>
или из строчки - (Domen.ru/forun/index/text.html) получить только (forun/index/text). без скобок

Очень нужно!

Автор: Rennigth 27.5.2008, 10:56

Foux, имхо используй регулярные выражения.

Автор: Foux 27.5.2008, 11:30

Спасибо, понял.

Автор: THandle 27.5.2008, 11:31

http://forum.vingrad.ru/articles/topic-213075.html

Автор: Foux 30.5.2008, 07:04

Что - то не могу я разобраться в них. Мало пимеров

Автор: Лиходей 31.5.2008, 10:52

Можно с помощью функций Pos и Copy

Код


procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
s:='ddddddddddd<title>Текст который нужно получить</title>sssssssssss';
label1.Caption := copy (s, (pos('<title>',s)+7), (pos('</title>',s)-pos('<title>',s)-7));
end;

Автор: Данкинг 31.5.2008, 11:03

Цитата(Лиходей @ 31.5.2008, 11:52

)

Можно с помощью функций Pos и Copy

Я так и делаю обычно - наглядно и просто. smile

Автор: Rohoss 31.5.2008, 12:45

Pos учитывает регистр, а <title> может иметь как символы верхнего регистра, так и нижнего…

Автор: Данкинг 31.5.2008, 13:39

Цитата(Rohoss @ 31.5.2008, 13:45)

Pos учитывает регистр, а <title> может иметь как символы верхнего регистра, так и нижнего…

А AnsiUpperCase на что? smile

Автор: Rohoss 31.5.2008, 13:58

Цитата(Данкинг @ 31.5.2008, 13:39

)

Цитата(Rohoss @ 31.5.2008, 13:45)Pos учитывает регистр, а <title> может иметь как символы верхнего регистра, так и нижнего…А AnsiUpperCase на что?

при поиске в большом количестве текста он пожирает много ресурсов…

Автор: Foux 1.6.2008, 08:10

А если нужно получить все от символов, до конца текста, тут уже по другому нужно?