1、WebBrower.quit;
2、在combobox1的onDrawItem写这样的代码,加一个imagelist
procedure Tchoose1.ComboBox2DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
var
    Offset: Integer;
begin
    with (Control as TCombobox).Canvas do
    begin
        FillRect(Rect);
        begin
            imagelist1.draw((Control as TCombobox).Canvas,Rect.Left + 2,Rect.Top + 2,Index+3);
            Offset := 16 + 8;
            TextOut(Rect.Left + Offset, Rect.Top + 2, (Control as TCombobox).Items[Index])
        end;
    end;
end;3、4等楼下回答。

解决方案 »

  1.   

    另外再加两问:
    1.如何在StatusPanel的各个不同的Panels中绘制不同的图像!
    2.为了对TWebBrowser里的内容复制,粘贴,需要初始化OLE对象,但这时候如何初始化每个窗口的TWebBrowser的OnNewWindow2事件?
    就像WebBrowser.OnNewWindow2:=self.WebBrowserNewWindow2
    但继续这样使用会出现System.IDispatch和Ole2.IDispatch不相容的错误!
      

  2.   

    To netlib(河外孤星):
    1.WebBrower.quit和释放资源并无多大关系!
    2.你的代码需要将style设为csOwnerDrawFixe或csOwnerDrawVariable
    而此时无法进行文字输入!
      

  3.   

    我就是想知道那个"优化整理内存"的功能是如何做的,我的浏览器在通常情况下比飓风浏览器占用内存还少,但用户选择了运行了飓风浏览器的"优化整理内存"的功能后,内存占用率马上从8-9M或几十M变成了2-3M!可是任良的飓风浏览器也存在几个严重技术缺陷!在这里就不说明了!
      

  4.   

    我自己解决了两个!"为了对TWebBrowser里的内容复制,粘贴,需要初始化OLE对象,但这时候如何初始化每个窗口的TWebBrowser的OnNewWindow2事件?
    就像WebBrowser.OnNewWindow2:=self.WebBrowserNewWindow2
    但继续这样使用会出现System.IDispatch和Ole2.IDispatch不相容的错误!"这个已经解决,原来OLE2中和System中都声明了IDispatch,只要在声明WebBrowserNewWindow2时指明是system.IDispatch既可解决!"能不能用ComboBox实现类似IE地址栏的下拉列表,既可以输入文字,又可以在前面绘制图标!
    如果不能,有什么简单的方法可以实现!"可以用DELPHI6中的ComboBoxEx中配合IAutoComplete接口实现!
    也可以用现成的TIEAddress控件,而ComboBoxEx和TIEAddress都是从TCustomComboBox继承来的!请帮忙解决剩下的问题!谢谢!
      

  5.   

    对于4,我想可以提取网页的代码,浏览整个代码,去掉window.open那一段,然后在放到TWebBrowser里。
      

  6.   

    挺简单的,3.4
    直接搜索整个网页的HTML然后分析代码,里面有弹出窗口的就看看是不是广告,如果是就关闭,只是代码量很大,我问这样的问题怎么都没有人关心的,你问关心的人还挺多的,不过多页面浏览器如果功能无法超过魔装网神这样的软件的话你就不必写了,没有什么市场了,做烂了都
      

  7.   

    我想可以在鼠标按下后,给某变量赋值,抬起后恢复,在OnNewWindow2中判断是否有按下鼠标的动作!以此来决定是否打开窗口!可行否?
      

  8.   

    ehom(?!) 大侠,
       写完了没有?快让我下载试用吧
      

  9.   

    试试embeddedwb.
    http://www.euromind.com/iedelphi/
      

  10.   

    Nicholas_Meng(冷月): 
    看了你给的网址,不知道应该高兴还是难过,看了后感觉我前几天来有80%的工作百做了!:)
      

  11.   

    to ehom:
    把你的邮箱给我
    我这里有一个实例
      

  12.   

    你理解错了,我不需要实例,我已经基本完成了!只需要解决两个细节问题:
    释放资源,禁止WebBrowser被JAVASCRIPT代码改变大小,位置!
    而且想要点详细的IE相关接口编程资料!
      

  13.   

    如何获取WebBrowser访问的网页,用于实现前进,后退!
      

  14.   

    基本解决了前进,后退的问题!在WebBrowserCommandStateChange事件中获取Command的值!case Command of
      CSC_NAVIGATEBACK :
      begin
        BTNBACK.Enabled := Enable;//改变后退按钮状态
      end;
      CSC_NAVIGATEFORWARD :
      begin
        BTNFORWARD.Enabled := Enable;//改变前进按钮状态
      end;
    end;而如果要像IE那样获得可前进或后退网页的列表菜单,看来只有自己写代码记录了?有好方法吗?