当前位置: 代码迷 >> Delphi >> 多页浏览器的前行和后退按钮的状态
  详细解决方案

多页浏览器的前行和后退按钮的状态

热度:8245   发布时间:2013-02-25 00:00:00.0
多页浏览器的前进和后退按钮的状态?
procedure   TForm1.CommandStateChange(Sender:TObject;Command:integer;Enable:WordBool);   
  begin   
      case   Command   of   
          CSC_NAVIGATEBACK:         back.Enabled   :=   Enable;   
          CSC_NAVIGATEFORWARD:   go.Enabled   :=   Enable;   
      end;   
  end;   
    
  用上面的代码不行,在切换pagecontrol的时候状态不会变。在第一个webbrowser里面“后退”按扭是有效的,切换到另一个webbrower的时候,"后退"按扭还是有效的。点了以后程序就会出错了。有没有什么在切换pagecontrol的时候进行判断当前webbrowser“后退”“前进”,然后自己来设置按扭的状态?????
怎么设置呢?
------解决方案--------------------------------------------------------
帮你顶一下
------解决方案--------------------------------------------------------
第一个方法:查询当前Webbrowser是否可用执行后退、前进命令。然后赋值后退前进按钮的Enabled。

第二个方法:CommandStateChange时,记录下当前Webbrower的前进后退按钮的可用状态。页面切换时Control1Change,重新赋值。
  相关解决方案