Получить ссылки из HTML-файла

[tsimokhin]

Не знаю попал по адресу или нет, но всё же:
Я знаю адрес ЛОКАЛЬНОЙ HTML-страницы (например D:\1.html)
Мне надо получить все ссылки, вернее то что указано в параметре href
т.е.:
если есть сслыка

<a href=1.html target=fdjgh alt=sfjdg>sf</a>

То мне надо получить 1.html, после долгих мучений, у меня получается обрубок ссылки.
Буду благодарен за любой, хоть как-нибудь, работающий код или идею.
P.S. Параметр href заканчивается пробелом или (если он в кавычках), то закрывающей

[Toxa]

var
i:integer;
s:string;
res:string;
begin
s:='<a href=1.html target=fdjgh alt=sfjdg>sf</a>';
i:=pos('href=',s)+5;
res:=copy(s,i,length((pos('.html',s)+5)-i);
end;

чтото типа этого, сам не проверял этот код, может чуток лишних символов показывать

[tsimokhin]

Спасибо, ум довёл до решения.