|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
08.09.2007, 20:12 | #1 |
Пользователь
Регистрация: 04.07.2007
Сообщений: 76
|
Поиск текста в строке
Нужно сделать так:
Если текст в определённой строке найден, то происходит одно действие. Если не найден то другое. Можно таким методом: ss:=copy(s,pos('text',s),length(s)-pos('text',s)); и там уже писать дальше... Но мне кажется что он не слишком рациональный и есть какой-то способ проще! Подскажите этот способ или скажите что его нет, если его действительно нет.
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
|
08.09.2007, 21:16 | #2 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Pos возвращает индекс символа с которого начинается искомая подстрока, если она не найдена возвращается ноль. Что непонятно?
Код:
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог Последний раз редактировалось mutabor; 08.09.2007 в 21:23. |
08.09.2007, 23:18 | #3 |
Пользователь
Регистрация: 04.07.2007
Сообщений: 76
|
Всё понятно! Спасибо!
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
|
30.09.2007, 15:24 | #4 |
Пользователь
Регистрация: 04.07.2007
Сообщений: 76
|
Ещё один вопрос по строкам:
Есть строка "http://site/213/4563" или "http://site/1074/3242". Вместо этих чисел могут быть другие. Как найти и записать в отдельные переменные 213 или 1074, 4563 или 3242? Вот так нахожу 213 или 1024: Код:
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
|
30.09.2007, 21:00 | #5 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Можно по разному, кто как привык, мне например так проще.
Копирует текст от нужного слеша до следующего или если его нет, то до конца строки Код:
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог Последний раз редактировалось mutabor; 30.09.2007 в 21:07. |
30.09.2007, 21:54 | #6 | |
Пользователь
Регистрация: 12.05.2007
Сообщений: 19
|
Цитата:
for i:=1 to length( строка ) do итд |
|
30.09.2007, 22:38 | #7 |
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,501
|
http://delphibasics.ru/AnsiPos.php - в последней проге, по обработке текстовых данных юзаю это. + это http://delphibasics.ru/Delete.php
Как мало нужно для счастья |
01.10.2007, 23:56 | #8 |
Пользователь
Регистрация: 04.07.2007
Сообщений: 76
|
Спасибо!
Alar, не понятно куда помещать Код:
Unsatisfied forward or external declaration: 'TForm1.AnsiPos' И ещё как сделать поиск строки по всему тексту? Чтобы после того как искомый текст встретиться в тексте, искать до конца документа и записывать в другие переменные?
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
|
02.10.2007, 01:01 | #9 | ||
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,501
|
CoDeR AnsiPos - передаёт адрес первого символа в строке, я его использую ещё и так
Цитата:
Цитата:
Впринципе, есть инструменты, а как использовать их придумай сам P.S. Когда я учился в школе, у меня был хирургический скальпель, очень удобно было карандаши точить |
||
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск и удаление символа в строке | Karl_Karlovi4 | Общие вопросы Delphi | 14 | 26.10.2011 18:04 |
Проблема поиск и замена текста(Delphi) | KirkMETAL | Помощь студентам | 4 | 26.07.2010 08:41 |
Как изменить цвет текста на всей строке в RichEdit, если строка содержит определенное слово?? | IIpopoK | Общие вопросы Delphi | 0 | 22.06.2008 07:57 |
Поиск и замена текста в файле | VAbramyak | Общие вопросы Delphi | 3 | 04.04.2007 20:20 |
поиск и замена текста в RichEdit | Vasya | Помощь студентам | 11 | 16.03.2007 06:48 |