Sabia yo que con un WebBrowser se podia hacer algo:
Colocas un webbrowser y un memo. En el evento ondocumentcomplete añades esto:
Código Delphi
[-] MEMO1.Text := WebBrowser1.OleObject.Document.body.innerHTML;
Y ya tienes el codigo fuente de la web en un memo, sólo hay que buscar las etiquetas con un "pos" y ya lo tienes.
Saludos