[Kotofff]

Вопрос 1

Код:

uses activex, mshtml;
...
...
procedure TForm1.Button3Click(Sender: TObject); 
var    
  Persist : IPersistFile; 
  Document : IHTMLDocument2; 
  b :LongBool; 
begin 
  Document :=Webbrowser1.Document as IHTMLDocument2; 
  Persist := Document as IPersistFile; 
  Persist.Save('C:\temp.htm',b); 
  Memo1.Lines.Loadfromfile('C:\temp.htm'); 
end;

Потом можно в Memo1.Text искать что угодно и как угодно.

Add

http://easyprog.ru/index.php?option=com_content&task=view&id=203&Item id=29