Нуждаюсь в помощи |Delphi7

Ни как не могу выдернуть из этого участка кода 1111

Пробую так:

Получается каша(... Дайте плиз пинка..., где смотреть, что предпринять, т.к. подобных участков кода около 10 шт. на странице, а нужно вытащить в список, типа:
1111
1341
5321...
Заранее благодарю за помощь

 

Можно но нужно знать номер строки.. если она по дефолту лежит можно через занести в tstring и убрать лишние через delete (data,1,9)

 

А можно по-подробнее, к примеру номер строки 191...

 

Вот так примерно: можно сразу из памяти брать..

 

или как к ней обратиться ( в смысле, к конкретной строке кода)?

 

Спасибо большое, будем пробовать

 

s:=d.Strings[191]; какая строка, delete (s,1,7); убирает в ней все с 1 по 7

 

<div>[0-9]+\, ([0-9]+)</div>

 

А как сделать не для d.LoadFromFile('С:\5715.htm'), a для idhttp1.get?

 

Code:

var
d: tstrings;
s: string;
begin
d:= tstringlist.Create;
[B]d.text:= idhttp1.get('http://site.com');[/B]
s:=d[191];
delete (s,1,7);
[B]d.free;[/B]
end;

 

s:=idhttp1.get()

 

Shadow67 спасибо