Hello list

I am trying to scrape text from a web page, I found this code that
works: 

Fuction scrape(WB: TWebBrowser);
tr := ((wb.Document AS IHTMLDocument2).body AS
IHTMLBodyElement).createTextRange;
frm_main.Memo1.Text:=tr.text;

However, the second time (and subsequent) a page is loaded my app throws
an exception.

I can't clear the document, can someone help me to scrape every page I
surf to?

_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi

Reply via email to