第一次用Delphi做和网页有关的程序,没经验,汗比如说就是CSDN的主页,我需要从中获取以下2组数据:
1、提取所有包含“微软”2字的行,存入个memo中;
2、同时获取该行的超链接url(可以假设每个微软行都有超链接),也存入memo中。搜了半天也没搜到想要的,只好请高手赐教。。
或者不完全符合上面的要求,给个类似的例子也行非常感谢!

解决方案 »

  1.   

    希望能對你有所幫助http://hi.baidu.com/szba/blog/item/9a0e5c1eed0431fc1bd57697.html
            for i := 0 to wb.OleObject.Document.links.Length - 1 do begin
                 str := wb.oleobject.document.links.item(i).innertext;//表示被連接的文字
                 if ansicontainsstr(str,edit1.Text) then //如果包含指定字符將點擊
                     //wb.OleObject.Document.links.item(i).click; 
                     memeo1.lines.add('文字:'+ str +' 鏈接:'+wb.oleobject.document.links.item(i).innertext);        end; 
      

  2.   

    谢谢楼上先。。不过url结果不对啊,文字和链接变成相同的了-_-
      

  3.   

    自己解决了,看来还是不能偷懒,把webbrowser的资料恶补了一下