собрать все ссылки с Html

[designer999]

Как можно собрать все ссылки с Html страницы ?
Может у кого то есть готовые примеры ?

[W0LF]

Для каждой страницы нужен индивидуальный подход...

[designer999]

ну например все ссылки в исходном коде href="http://softporal.ucoz.ru/"
знаю что нужно пропарсить первый href=" и ''и вытянуть с него ссылку, но никак програмно не могу понять как это сделать

[designer999]

что бы конец откинуть использовал
<td width="450">&nbsp;<a name="torrent2crazy.com" target="_blank" onclick="cl(this)" href="http://www.torrent2crazy.com

for i:=0 to Memo1.Lines.Count do
begin
s:=Memo1.Lines[i];
Delete(S,Pos('/"',S),Length(S)-Pos('/"',S)+1);
Memo1.Lines[i]:=s;
end;

А что нужно изменить что бы откинуть начало ?
пробовал так

for i:=0 to Memo1.Lines.Count do
begin
s:=Memo1.Lines[i];
Delete(s,0,Length(S)-Pos(S,'href="')+1);
Memo1.Lines[i]:=s;
end;

но что то не выходит

[W0LF]

Пример парсера страницы, берущий все ссылки от href=" до "...