не находит так не чего, колонки пустые
А если в
ListView1.Items[0].SubItems.Append(Copy(str,BPos,EPos - BPos));
делаю так
ListView1.Items[0].SubItems.Append(Copy(str,EPos - BPos));
то получаю в колонки et="_blank">...</a></b>
МИСТИКА, сделал так
Код:
while Pos('view.php?ad=',str)>0
do begin
BPos := Pos('view.php?ad=',str)+12;
EPos := Pos('" target="',str);
Form2.ListView1.Items[0].SubItems.Append(Copy(str,BPos,BPos - EPos));
Delete(str,1, BPos+12);
получаю номер ссылку, тоесть то что мне нада, но вместе с ним" target="_blank">...</a></b>