|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.10.2016, 11:19 | #1 |
Форумчанин
Регистрация: 16.01.2011
Сообщений: 288
|
удалить после
Есть ссылка,как удалить http:// и все что после / в нашем случае blablabla
http://www.site.com/blablalbla |
06.10.2016, 11:47 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
поищите описания и примеры:
Pos() - чтобы проверить наличие нужного символа в строке Delete() - чтобы удалить из строки, и/или Copy() - скопировать из строки нужное. а если ссылка такая: http://www.site.com/bla/mala/lava что нужно получить в итоге? и протокол (то, что в начале строки) допускается только http или может быть https ? p.s. ещё можно использовать регулярные выражения. но, боюсь, это немного сложновато для Вас... |
06.10.2016, 11:55 | #3 |
Форумчанин
Регистрация: 16.01.2011
Сообщений: 288
|
Ох да забыл,спасибо.Да и http и https в итоге должно получится www.site.com
|
06.10.2016, 13:53 | #4 |
Пользователь
Регистрация: 16.10.2014
Сообщений: 51
|
Есть более простое решение если воспользоваться моим юнитом Mystr
http://slaur.perm.ru/DELPHI/INDEX.HTM Ваше решение: Result:=cNFi(3,'http://www.site.com/blablalbla','/') |
06.10.2016, 21:16 | #5 |
Старожил
Регистрация: 12.11.2010
Сообщений: 8,568
|
Да зачем, чьи-то юниты, когда есть регулярныеВыражения
|
07.10.2016, 04:57 | #6 |
Форумчанин
Регистрация: 29.10.2015
Сообщений: 273
|
Код:
|
16.10.2016, 17:10 | #7 |
Я самый любопытный
Участник клуба
Регистрация: 24.07.2012
Сообщений: 1,949
|
Второй вариант:
Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Удалить значения после определенного символа | Banjo | Microsoft Office Excel | 17 | 04.04.2017 14:06 |
Удалить все, что после символа | fijiisland | Microsoft Office Excel | 8 | 31.03.2017 16:04 |
Удалить все после запятой в memo | mitiay | Общие вопросы Delphi | 51 | 15.02.2016 17:06 |
Делфи. Удалить все лова после 5-го | serhan | Помощь студентам | 3 | 09.02.2012 13:40 |
как удалить знаки после запятой | ukrman | Microsoft Office Excel | 11 | 03.02.2012 17:22 |