项目中需要使用WinForm应用程序来包装BS应用程序的浏览器外壳,在.NET的WebBrowser中没有多选项卡浏览的自带配置属性,我们需要实现多选项卡的浏览器控件来实现包装BS应用程序的目的,而不会弹出IE浏览器窗口。
WebBrowser 控件为 WebBrowser ActiveX 控件提供了托管包装。托管包装使您可以在 Windows 窗体客户端应用程序中显示网页。使用 WebBrowser 控件,可以复制应用程序中的 Internet Explorer Web 浏览功能,还可以禁用默认的 Internet Explorer 功能,并将该控件用作简单的 HTML 文档查看器。
l 如何:使用 WebBrowser 控件定位到 URL
this.webBrowser1.Navigate("http://www.microsoft.com");
l WebBrowser的 CreateSink 方法和DetachSink 方法
CreateSink方法使基础 ActiveX 控件与可以处理控件事件的客户端相关联。
DetachSink方法使从基础 ActiveX 控件中释放附加在 CreateSink 方法中的事件处理客户端。
下面的代码示例演示如何在派生自 WebBrowser 的类中使用此方法,该方法使用 OLE DWebBrowserEvents2 接口中的 NavigateError 事件对常规 WebBrowser 事件进行补充。
using System;
using System.Windows.Forms;
using System.Runtime.InteropServices;
using System.Security.Permissions;
namespace WebBrowserExtensibility
{
[PermissionSetAttribute(SecurityAction.Demand, Name="FullTrust")]
public class Form1 : Form
{
[STAThread]
public static void Main()
{
Application.Run(new Form1());
}
private WebBrowser2 wb = new WebBrowser2();
public Form1()
{
wb.Dock = DockStyle.Fill;
wb.NavigateError += new
WebBrowserNavigateErrorEventHandler(wb_NavigateError);
Controls.Add(wb);
wb.Navigate("www.widgets.microsoft.com");
}
private void wb_NavigateError(
object sender, WebBrowserNavigateErrorEventArgs e)
{
// Display an error message to the user.
MessageBox.Show("Cannot navigate to " + e.Url);
}
}
public class WebBrowser2 : WebBrowser
{
AxHost.ConnectionPointCookie cookie;
WebBrowser2EventHelper helper;
[PermissionSetAttribute(SecurityAction.LinkDemand, Name="FullTrust")]
protected override void CreateSink()
{
base.CreateSink();
helper = new WebBrowser2EventHelper(this);
cookie = new AxHost.ConnectionPointCookie(
this.ActiveXInstance, helper, typeof(DWebBrowserEvents2));
}
[PermissionSetAttribute(SecurityAction.LinkDemand, Name="FullTrust")]
protected override void DetachSink()
{
if (cookie != null)
{
cookie.Disconnect();
cookie = null;
}
base.DetachSink();
}
public event WebBrowserNavigateErrorEventHandler NavigateError;
protected virtual void OnNavigateError(
WebBrowserNavigateErrorEventArgs e)
{
if (this.NavigateError != null)
{
this.NavigateError(this, e);
}
}
private class WebBrowser2EventHelper :
StandardOleMarshalObject, DWebBrowserEvents2
{
private WebBrowser2 parent;
public WebBrowser2EventHelper(WebBrowser2 parent)
{
this.parent = parent;
}
public void NavigateError(object pDisp, ref object url,
ref object frame, ref object statusCode, ref bool cancel)
{
// Raise the NavigateError event.
this.parent.OnNavigateError(
new WebBrowserNavigateErrorEventArgs(
(String)url, (String)frame, (Int32)statusCode, cancel));
}
}
}
public delegate void WebBrowserNavigateErrorEventHandler(object sender,
WebBrowserNavigateErrorEventArgs e);
public class WebBrowserNavigateErrorEventArgs : EventArgs
{
private String urlValue;
private String frameValue;
private Int32 statusCodeValue;
private Boolean cancelValue;
public WebBrowserNavigateErrorEventArgs(
String url, String frame, Int32 statusCode, Boolean cancel)
{
urlValue = url;
frameValue = frame;
statusCodeValue = statusCode;
cancelValue = cancel;
}
public String Url
{
get { return urlValue; }
set { urlValue = value; }
}
public String Frame
{
get { return frameValue; }
set { frameValue = value; }
}
public Int32 StatusCode
{
get { return statusCodeValue; }
set { statusCodeValue = value; }
}
public Boolean Cancel
{
get { return cancelValue; }
set { cancelValue = value; }
}
}
[ComImport, Guid("34A715A0-6587-11D0-924A-0020AFC7AC4D"),
InterfaceType(ComInterfaceType.InterfaceIsIDispatch),
TypeLibType(TypeLibTypeFlags.FHidden)]
public interface DWebBrowserEvents2
{
[DispId(271)]
void NavigateError(
[In, MarshalAs(UnmanagedType.IDispatch)] object pDisp,
[In] ref object URL, [In] ref object frame,
[In] ref object statusCode, [In, Out] ref bool cancel);
}
}
l WebBrowser. DocumentCompleted 事件
在 WebBrowser 控件完成加载文档时发生。
处理 DocumentCompleted 事件,在新文档完成加载时接收通知。如果 DocumentCompleted 事件发生,则新文档已完全加载,这意味着可以通过 Document、DocumentText 或 DocumentStream 属性访问该文档的内容。
TabControl 控件是Windows 窗体多个选项卡控件,这些选项卡类似于笔记本中的分隔卡和档案柜文件夹中的标签。选项卡中可包含图片和其他控件。您可以使用该选项卡控件来生成多页对话框,这种对话框在 Windows 操作系统中的许多地方(例如控制面板的“显示”属性中)都可以找到。
l 如何:将控件添加到选项卡页
tabPage1.Controls.Add(new Button());
l 如何:使用 Windows 窗体 TabControl 添加和移除选项卡
添加选项卡
string title = "TabPage " + (tabControl1.TabCount + 1).ToString();
TabPage myTabPage = new TabPage(title);
tabControl1.TabPages.Add(myTabPage);
移除选项卡
tabControl1.TabPages.Remove(tabControl1.SelectedTab);
l TabControl.DrawItem 事件
如果将 DrawMode 属性设置为 OwnerDrawFixed,则每当 TabControl 需要绘制它的一个选项卡时,它就会引发 DrawItem 事件。若要自定义选项卡的外观,请在用于 DrawItem 事件的处理程序中提供自己的绘制代码。
下面的代码示例创建一个包含一个 TabPage 的 TabControl。本示例声明一个事件处理程序,并用来在 tabPage1 的选项卡上绘制字符串和 Rectangle。该事件处理程序绑定到 DrawItem 事件。
using System.Drawing;
using System.Windows.Forms;
public class Form1 : Form
{
private Rectangle tabArea;
private RectangleF tabTextArea;
public Form1()
{
TabControl tabControl1 = new TabControl();
TabPage tabPage1 = new TabPage();
tabControl1.DrawMode = TabDrawMode.OwnerDrawFixed;
tabControl1.SizeMode = TabSizeMode.Fixed;
tabControl1.Controls.Add(tabPage1);
tabControl1.ItemSize = new Size(80, 30);
tabControl1.Location = new Point(25, 25);
tabControl1.Size = new Size(250, 250);
tabPage1.TabIndex = 0;
ClientSize = new Size(300, 300);
Controls.Add(tabControl1);
tabArea = tabControl1.GetTabRect(0);
tabTextArea = (RectangleF)tabControl1.GetTabRect(0);
tabControl1.DrawItem += new DrawItemEventHandler(DrawOnTab);
}
private void DrawOnTab(object sender, DrawItemEventArgs e)
{
Graphics g = e.Graphics;
Pen p = new Pen(Color.Blue);
Font font = new Font("Arial", 10.0f);
SolidBrush brush = new SolidBrush(Color.Red);
g.DrawRectangle(p, tabArea);
g.DrawString("tabPage1", font, brush, tabTextArea);
}
static void Main()
{
Application.Run(new Form1());
}
}
需要实现的功能特性:
l 实现打开BS应用程序的链接或窗口跳转到选项卡中而不是新窗口。
l 实现选项卡的关闭和新建,注意只有一个选项卡得时候不可以选项卡不可以出现关闭图片按钮。
我们主要采用TabControl和WebBrowser来实现多选项卡浏览器控件开发。
现介绍主要控件实现代码。
u 新建选项卡页面代码实现如下:
public void CreateNewTabPage(string url)
{
ExtendedWebBrowser web = new ExtendedWebBrowser();
web.Name = "WebBroswer" + _webBrowserLists.Count.ToString();
web.Dock = DockStyle.Fill;
web.Margin = new Padding(0, 0, 0, 0);
web.DocumentCompleted += new WebBrowserDocumentCompletedEventHandler(webBrowser1_DocumentCompleted);
web.BeforeNewWindow += new EventHandler(webBrowser1_BeforeNewWindow);
web.Navigate(url);
_webBrowserLists.Add(web);
TabPage tbp = new TabPage();
tbp.Name = "TabPage" + tabControl1.TabCount.ToString();
tbp.Text = "空白页";
tbp.Padding = new Padding(0, 3, 0, 0);
tbp.Margin = new Padding(0, 3, 0, 0);
tbp.ImageIndex = 0;
tbp.Controls.Add(web);
this.tabControl1.Controls.Add(tbp);
this.tabControl1.SelectedTab = tbp;
}
u 把网页标题及图片关闭按钮的绘制选项卡中代码实现如下:
private void tabControl1_DrawItem(object sender, DrawItemEventArgs e)
{
try
{
Graphics g = e.Graphics;
Rectangle tabRectangle = this.tabControl1.GetTabRect(e.Index);
//先添加TabPage属性
g.DrawString(this.tabControl1.TabPages[e.Index].Text
, this.Font, SystemBrushes.ControlText, tabRectangle.X + 3, tabRectangle.Y + 3);
if (tabControl1.TabCount > 1)
{
//再画一个矩形框
using (Pen p = new Pen(SystemColors.Control))
{
tabRectangle.Offset(tabRectangle.Width - (CLOSE_SIZE + 3), 2);
tabRectangle.Width = CLOSE_SIZE;
tabRectangle.Height = CLOSE_SIZE;
g.DrawRectangle(p, tabRectangle);
}
g.DrawImage(e.State == DrawItemState.Selected ? imageList1.Images["closeSelected"] : imageList1.Images["close"], new Point(tabRectangle.X, tabRectangle.Y));
}
g.Dispose();
}
catch (Exception ex)
{
throw (ex);
}
}
u Webbrowser控件完成时及Webbrowser控件新建窗口时代码实现如下:
private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
{
ExtendedWebBrowser web = (ExtendedWebBrowser)(sender);
string title = web.Document.Title.Trim();
TabPage tb = (TabPage)web.Parent;
tb.Text = title.Length > 6 ? title.Substring(0, 6) + "..." : title;
if (tabControl1.SelectedTab == tb)
{
this.Text = title;
}
}
private void webBrowser1_BeforeNewWindow(object sender, System.EventArgs e)
{
WebBrowserExtendedNavigatingEventArgs eventArgs = e as WebBrowserExtendedNavigatingEventArgs;
CreateNewTabPage(eventArgs.Url);
eventArgs.Cancel = true;
}