Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.14;
Скачать: CL | DM;

Вниз

Помогите пожалуйста с текстом..   Найти похожие ветки 

 
Alcogol   (2002-11-05 09:06) [0]

Добрый день,
У меня есть текст:

<tag>TEXT1:TEXT2</tag>
<tag>TEXT1:TEXT2</tag>
<tag>TEXT1:TEXT2</tag>

TEXT1 постоянно меняеться, соответственно его длинна тоже.
Вот такой вопрос:
Как можно вырезать TEXT1 (т.е текст от ">" до ":") ?

Заранее благодарен..


 
Lego ©   (2002-11-05 09:12) [1]

Посмотри в хелпе дельфовом фцнкции Copy, Pos, Delete


 
Alcogol   (2002-11-05 09:32) [2]

Lego, это усе уже смотрел. Если бы длинна первого текста не менялась, то проблем бы не было. :-(


 
Anatoly Podgoretsky ©   (2002-11-05 09:34) [3]

В чем проблема процедура Delete


 
VDen ©   (2002-11-05 09:40) [4]

2 Alcogol

Ищи позицию двоеточия, отнимай единицу,
delete"ом удаляй кусок строки до этого символа.


 
Snake ©   (2002-11-05 10:12) [5]

Лови:
s:="<tag>TEXT1:TEXT2</tag>"
Delete(S,6,pos(":")-1)



 
Calm ©   (2002-11-05 12:42) [6]

В D6 есть модуль для таких случаев. Называется StrUtils. Там есть фукнции для выделения слов из строки при заданных разделителях.
Аналогичный модуль есть в RX для D6 - rxStrUtils
RX для D5 - StrUtils.

Давно пользуюсь, очень удобно. Никаких запутанных вычислений, типа найти первый символ >, найти первый символ :, скопировать из строки подстроку, начиная с позиции вхождения первого символа >, заканчивая позицией вхождения первого символа :.


 
Alcogol   (2002-11-05 14:13) [7]

Спасибо все за советы, у меня получилось! :-)



Страницы: 1 вся ветка

Текущий архив: 2002.11.14;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.013 c
3-45719
Карелин Артем
2002-10-23 14:49
2002.11.14
ClientDataSet - халява??


3-45714
seter
2002-10-24 11:10
2002.11.14
Базы данных


14-46073
TTCustomDelphiMaster
2002-10-25 16:35
2002.11.14
Ну вот опять День Рожденья


3-45687
Youri
2002-10-28 13:18
2002.11.14
Фільтр в IBtable!


8-46014
ctapik-net
2002-07-24 22:36
2002.11.14
Надпись на картинке