DeleteLeft для строки....

[Человек_Борща]

Доброго времени суток!

Пишу парсер для сайта.

Собстенно там есть нейкий список элементов.
Выстраиваю его в строку...
элемент1<данные>|элемент2<данные>|э лемент3<данные>|элемент4

выгрубаю данные. И нужно убрать мусор после себя.
я удаляю то что обозначается началом элемент1 и ищу элемент2. Но чтобы продожить разбор, нужно удалить весь текст слева(мусор оставшийся от элемент1) от обозначения элемент2:
элемент2<данные>|элемент3<данные>|э лемент4

ухголова кругом уж не соображаю как это делать..

[Аватар]

i:=Pos('элемент2',s);
if i>0 then s:=Copy(s,i,Length(s)-i+1);

[fate]

что-то я не совсем понял задачу, тебе нужно удалить все кроме данных?

[Человек_Борща]

нет, смотрите:
Есть вот такие данные(часть из них):

{блок 1}
        <li class="prod_list_item">

                <a href="/catalog/3/29/id3719.html">
            <img class="product_list_pic" id="prodpic_3719" style="float:left;" alt="100020" src="../../../data/products/3/small/100020.jpg" />
        </a>
        <p>Артикул: 100020
                        
        </p>
        <p style="clear:both;">
                        Цена&nbsp;от 14.00 руб.
        </p>
        <div style="margin-top:-12px;">
            <input type="checkbox" class="product_list_checker " id="prodchecker_3719" value="3719"  />
                   <label for="prodchecker_3719">в корзину</label>
            <!--<a href="/catalog/3/29/id3719.html">подробно&nbsp;&rarr;</a>-->
        </div>
    </li>

{блок 2}
        <li class="prod_list_item">

                <a href="/catalog/3/29/id3719.html">
            <img class="product_list_pic" id="prodpic_3719" style="float:left;" alt="100020" src="../../../data/products/3/small/100020.jpg" />
        </a>
        <p>Артикул: 100020
                        
        </p>
        <p style="clear:both;">
                        Цена&nbsp;от 14.00 руб.
        </p>
        <div style="margin-top:-12px;">
            <input type="checkbox" class="product_list_checker " id="prodchecker_3719" value="3719"  />
                   <label for="prodchecker_3719">в корзину</label>
            <!--<a href="/catalog/3/29/id3719.html">подробно&nbsp;&rarr;</a>-->
        </div>
    </li>

алгоритм в цикле repeat until бегает по списку, пока не закончаться блоки данных. Блоком считается то, что находится после <li class="prod_list_item">

Ну так вот, алгоритм выгребает данные из "блок 1", и переходит к "блок 2", но т.к. идентификатора <li class="prod_list_item"> для "блок 1" больше нет(стираеся перед след. интерацией цикла), то остаётся мусор от "блок 1"...
по этому, нужно удалить все, что выше "блок 2" т.е. должно стать так:

{блок 2}
        <li class="prod_list_item">

                <a href="/catalog/3/29/id3719.html">
            <img class="product_list_pic" id="prodpic_3719" style="float:left;" alt="100020" src="../../../data/products/3/small/100020.jpg" />
        </a>
        <p>Артикул: 100020
                        
        </p>
        <p style="clear:both;">
                        Цена&nbsp;от 14.00 руб.
        </p>
        <div style="margin-top:-12px;">
            <input type="checkbox" class="product_list_checker " id="prodchecker_3719" value="3719"  />
                   <label for="prodchecker_3719">в корзину</label>
            <!--<a href="/catalog/3/29/id3719.html">подробно&nbsp;&rarr;</a>-->
        </div>
    </li>

[fate]

но т.к. идентивикатора <li class="prod_list_item"> для "блок 1" больше нет

а зачем ты удаляешь только <li class="prod_list_item"> ? вытащил нужные данные и удаляй сразу весь блок от <li class="prod_list_item"> до </li>

[fate]

а ты вытаскиваешь артикул и цену?
Могу набросать код с использованием регулярных выражений

[Аватар]

Если это сторока, чем не устраивает то, что выше предложено? Вместо 'элемент2' поставить '<li class="prod_list_item">'

[Пепел Феникса]

i:=Pos('<li class="prod_list_item">',s);//порядок параметров уже не помню
while i>0 do
 begin
  //предположу что нужны артикул и цена
  i:=PosEx('<p>Артикул: ',s,i)+12;
  art:=Copy(s,i,PosEx(#13,s,i)-i));
  i:=PosEx('Цена&nbsp;от ',s,i)+13;
  price:=(s,i,PosEx(' руб',s,i)-i);
  i:=PosEx('<li class="prod_list_item">',s,i);
 end;

примерно так.

PS: залог хорошего парсера, не использовать Delete.(так как он снижает скорость+повышает расход памяти)

[Человек_Борща]

fate, да имено эти данные. Спасибо, проблему решил удалением всего блокаа до </li>.

Пепел Феникса, благодарен за совет.

Всем ++