Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.89/19: Рейтинг темы: голосов - 19, средняя оценка - 4.89
 Аватар для dpj
4 / 4 / 1
Регистрация: 07.09.2011
Сообщений: 55

Регулярное выражение - не находит конец строки

09.09.2011, 21:40. Показов 3946. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
не могу взять текст между Location: и концом строки

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
buf := 'Location: [url]http://www.site.com/[/url]
Content-Length: 211
Accept-Ranges: bytes';
 
function redi (buf : string) : string;
var
RegExp: TRegExpr;
begin
 RegExp := TRegExpr.Create;
 RegExp.Expression := 'Location: (.*)'+ #13#10+'$?';
 if RegExp.Exec(buf) then
 begin
 buf := RegExp.Match[1];
 Result := buf;
 end else Result := 'не найдено';
 RegExp.Free;
end;
пробовал еще так
Delphi
1
 RegExp.Expression := 'Location: (.*)#13#10$?';
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
09.09.2011, 21:40
Ответы с готовыми решениями:

Регулярное выражение
В проекте используется TRegExpr. Помогите составить выражение для отображения "Russian Federation, Самара" Из этой строки: <a...

Регулярное выражение
В регулярках не селен, подскажите регулярное выражение что бы спарсить между title=" и user=" В интернете есть, но ищет он...

Регулярное выражение
Доброго времени суток! Нужно спарсить следующий html код: <tr> <td>Текст1</td> <td>Текст2</td> <td...

20
 Аватар для dpj
4 / 4 / 1
Регистрация: 07.09.2011
Сообщений: 55
10.09.2011, 02:21  [ТС]
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от anonimus Посмотреть сообщение
держи
Delphi
1
reg.Expression:='(Location:)[\s]+([^+'#13'+]+)';
Добавлено через 1 минуту
в reg.Match[2] результат
Спасибо, результат http://site.com как и нужно было. Я тут тоже поковырялся понял что reg.Expression:='^Location: (.*)$' тоже должно работать при условии, что будет использован ключ отменяющий жадность. Вот только я не знаю как использовать этот ключ в строке, подозреваю что в квадратных скобках исходя из твоего примера.

Добавлено через 1 час 28 минут
Цитата Сообщение от dpj Посмотреть сообщение
Спасибо, результат http://site.com как и нужно было. Я тут тоже поковырялся понял что reg.Expression:='^Location: (.*)$' тоже должно работать при условии, что будет использован ключ отменяющий жадность. Вот только я не знаю как использовать этот ключ в строке, подозреваю что в квадратных скобках исходя из твоего примера.
Вот еще один вариант
Delphi
1
RegExp.Expression := 'Location:(.*?)\n';
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
10.09.2011, 02:21
Помогаю со студенческими работами здесь

Регулярное выражение не находит строки с кириллицей
$res = preg_match('/конкурс/i', 'Конкурс'); var_dump($res); Выводит int(0) почему? ведь должно быть int(1) Аномалия?

Регулярное выражение не находит совпадений
Здравствуйте. Есть код: TRegExpr *clearSite = new TRegExpr(); clearSite->Expression = _T("(^+$)"); clearSite->ModifierM = true; ...

Регулярное выражение: конец абзаца
Подскажите как в регулярных выражениях указать конец абзаца. В справочнике пишут, что знак доллара ($), но вот, допустим, две строки: ...

Регулярное выражение. Определить конец
string text = "Тратаааа ** /su/Pan/Pan/Czech/Cyu/Xul/ 111 Бам бам бам ** /su/Czech/Czech/Czech/Cyu/Xul/ 111" Regex newReg = new...

Регулярное выражение находит не все включения
Здравствуйте. Хочу получить коллекцию подстрок, найденных в строке с помощью регулярного выражения. Использую объект Regex, результат...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
21
Ответ Создать тему
Новые блоги и статьи
Модель здравоСохранения 15. Как мы чинили AnyLogic модель рабочего коллектива: сочленение диаграммы состояний болезней и поломок в ресурспул
anaschu 23.05.2026
Как мы чинили AnyLogic модель рабочего коллектива Сегодня разобрались с пятью багами, из-за которых модель либо падала с ошибкой, либо давала совершенно бессмысленные результаты. Каждый баг был. . .
Диалоги с ИИ
zorxor 23.05.2026
Насколько я понимаю - Вы - Искусственный Интеллект. Это так? Да, всё верно. Я — искусственный интеллект. Я представляю собой большую языковую модель, созданную для помощи в самых разных задачах. . . .
Модель здравосохранения 14. Собираем всю модель вместе.
anaschu 22.05.2026
Модель собрана. В будущих постах на видео я покажу, как она работает. В этом посте запускаем её, проверяем результаты и разбираем что можно с ней делать дальше. Перед запуском проверяем. . .
Модель здравоохранения 13. Добавление самой системы здравоохранения.
anaschu 22.05.2026
В предыдущем посте мы настроили болезни. Теперь добавим события, которые управляют здоровьем всего коллектива, а также настроим рабочий график и расчёт финансов. В Main создаём четыре события. . . .
Модель здравоохранения 12. добавление болезней через ресурпул, как аварии
anaschu 22.05.2026
Болезни — это ключевая часть нашей модели. Нам нужно, чтобы работник периодически уходил на больничный, его задание при этом зависало, а после выздоровления работа возобновлялась. Реализуем это двумя. . .
Модель здравоохранения 11. Создаём классы Задание и Работник
anaschu 22.05.2026
В AnyLogic каждая заявка и каждый ресурс — это объект определённого класса. Нам нужно создать два класса: Задание (заявка) и Работник (ресурс). Класс Задание В дереве проекта нажимаем правой. . .
Модель здравоохранения 10. Новая модель, смотрим, как добавлять логические блоки, и что писать внутри
anaschu 22.05.2026
Открываем AnyLogic, создаём новый проект. В дереве проекта появляется класс Main — это главный агент, в котором будет жить вся наша логика. Палитра блоков Слева находится палитра. Нас интересует. . .
модель ЗдравоСохранения 9. Новая модель, разбираемся, как ее создавать
anaschu 22.05.2026
В этой серии постов мы построим модель небольшого рабочего коллектива. Сотрудники получают задания, выполняют их, иногда болеют — и мы хотим посчитать, сколько это стоит компании. Метод. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru