Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 24.06.2012, 09:22
Gudzik11 Gudzik11 вне форума
Начинающий
 
Регистрация: 27.09.2011
Сообщения: 158
Репутация: 10
По умолчанию Поиск в массиве

Здравствуйте ! помогите пожалуста . Нужно выташить все значения между тэгами <div> </div> из масива
Код HTML:
<tdclass="first">Давление,ммрт.ст.</td> <tdclass="wni_left"> <div><div> 747</div></div> </td> <td> <div> 747</div> </td> <td> <div> 746</div> </td> <tdclass="wni_right"> <div><div> 745</div></div> </td> </tr>

делаю так

Код:
    // Давление,ммрт.ст.
            text1:= Copy(text,Pos('<td class="first">Давление,ммрт.ст.</td>',text),Pos('<tr class="wnow_info no_bg">',text)-Pos('<td class="first">Давление,ммрт.ст.</td>',text));
            DeleteSymbol(text1, ' ');
     
            lin1:=1;
            while (pos('<div>',text1)>0) do
            begin
     
             first[lin,lin1]:=extract(text1,'<div>','</div>');
             delete(text1,1,pos('</div>',text1));
             lin1:=lin1+1;
            end;


находит на одно значение больше
Код HTML:
<div>747 747 747 746 <div>745

как правильно сделать ?
Ответить с цитированием
  #2  
Старый 24.06.2012, 16:35
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

как удалить первый элемент массива что ли?
Ответить с цитированием
  #3  
Старый 24.06.2012, 18:24
Gudzik11 Gudzik11 вне форума
Начинающий
 
Регистрация: 27.09.2011
Сообщения: 158
Репутация: 10
По умолчанию

Нет. Первый элемент уже отдельно записан в массив.
Уже решил с помощью функции
Код:
function Replace(Str, X, Y: string): string;
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 16:05.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter