RT,想使TWebBrowser只显示指定的图象,应当如何实现呢?
另外,怎么把已经显示在TWebBrowser里的图象,在一个TImage控件上显示出来呢?
开头我是直接查找Cache项,
然后找到网页里显示的图象在磁盘上对应的文件,
再用TImage调入这个图象
但是现在发现,有些图片在网页上显示了,确在缓存里根本没对应项....
Google了半天没找到答案,求教CSDN高手帮帮忙解决上面两个问题

解决方案 »

  1.   

    显示指定的图象?  这样不行吗:procedure TForm1.Button1Click(Sender: TObject);
    begin
      WebBrowser1.Navigate('http://www.csdn.net/CSDN_Common_Header_Footer/Images/BiaoShi.gif');
    end;
      

  2.   

    you need to get into the http layer
    suggest reading
    http://www.codeproject.com/atl/vbmhwb.asp#RegisterBindStatusCallback
      

  3.   

    回复人:dBASEIII(~~广告: 赠可用分交换本ID,有意者站内短信联系) ( 四级(中级)) 信誉:100  2007-1-14 23:15:41  得分:0
    ?  显示指定的图象? 这样不行吗:procedure TForm1.Button1Click(Sender: TObject);
    begin
    WebBrowser1.Navigate('http://www.csdn.net/CSDN_Common_Header_Footer/Images/BiaoShi.gif');
    end;
    ------------------------------------------------------------------------
    如果图象是验证码你的方法就不行了!
    我也很想知道怎么把已经显示在TWebBrowser里的图象,在一个TImage控件上显示出来。
    var
      d2,D:IHTMLDocument2;
      d1:IHTMLDocument;
      e:IHTMLElement;
      e2:IHTMLElement2;
      cp:IHTMLControlRange;
      img:IHTMLImgElement;
      ce:IHTMLControlElement;
    begin
      D:= webbrowser1.Document as IHTMLDocument2;
      e:=d.body as IHTMLElement;
      e2:=e as IHTMLElement2;
      cp:=e2.createControlRange as IHTMLControlRange;
      d2:= webbrowser1.Document as IHTMLDocument2;
      img:=d2.images.item('imgname',0) AS IHTMLImgElement;
      ce:=img as IHTMLControlElement;
      cp.add(ce);
      cp.execCommand('Copy',false,0);
    end;
    请高手指教为什么上面的程序不能把图片拷贝进剪贴板?
      

  4.   

    哈哈!!搞定了。
    方法只有是先把图片考进剪贴板,再从剪贴板考到TImage中。
    我上面的程序没有错,只是没有初始化active,所以程序不能把图片拷贝进剪贴板。
    初始化如下
    initialization
    OleInitialize(nil);
    finalization
    OleUninitialize;//end.前面。
    在uses中加入ActiveX
      

  5.   

    我知道仁兄说的是什么意思,但我现在才开始学DELPHI,所以无法帮你。
      

  6.   

    lovewormcn () 
    你的图片显示问题解决了吗?我也有一样的问题啊!就是只想显示某一张图片。
    那位高手给个答案啊