Последние записи

made in programmersforum 1

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

20th
Апр

Пример использования функций post и copy в Delphi

Posted by Chas under Delphi

подскажите с помощью pos copy как сделать,
надо взять текст во всех строчках где есть слово back после b=и до &.

<div class=", b=123456789 &amp;amp;amp;, back

<div class=", b=325698712 &amp;amp;amp;, next

<div class=", b=98712563 &amp;amp;amp;, back

<div class=", b=300054 &amp;amp;amp;, next

<div class=", b=344889 &amp;amp;amp;, next

<div class=", b=90002458 &amp;amp;amp;, back

должно получится

123456789 
          98712563
          90002458

_SERGEYX_

Memo2.clear;

for i:=0 to memo1.lines.count-1 do

if pos('back', memo1.lines) <> 0 then

Memo2.lines.Add(copy(memo1.lines, pos('=', memo1.lines)+1, pos('&', memo1.lines) - pos('=', memo1.lines)));

описание функции pos
описание функции copy

тема на форуме