自定义TWebBrowser浏览器控制遇到的一些问题
最近工作需要，要将TWebBrowser样式改头换面，包括菜单，滚动条等，都要换掉。
由于滚动条已经屏蔽掉，所以关于页面滚动等，全部都需要自己写代码来模拟了。模拟的过程中发现获得页面的客户区大小ClientHeight,ClientWidth以及页面总大小ScrollHeight,ScrollWidth的时候，还有滚动条滑块位置ScrollTop,ScrollLeft的值总是有不对的情况，通过在网上查找才发现，原来是W3C标准在作怪，只要是使用了W3C标准格式
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
作为开头的，我使用
((FWebBrowser.Document as IHTMLDocument2).body as IHTMLElement2).scrollTop这些获得的值都有问题，始终为0
而不用该格式的，都不会有问题。
那么使用了该格式的，用什么方法来获得呢！通过资料发现
FWebBrowser.oleobject.document.documentelement.ClientHeight;这样的方式来获得标准格式的各个值。
资料原文如下
- JavaScript:
- function IeTrueBody(){//判断头部是否有标准声明
- return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
- }
通过这里我们可以看到，需要检查是否是标准文档，这个就需要document.compatMode的判断
资料如下：
转载:http://www.cnscn.org(CNS电脑与英语学习网)
声明:我写的博客就是我的学习笔记,让我在忘记的时候可以在任何时候,任何地方,打开连接就可以看到,让我想起忘记的东西.
我的博客通常都有资料来源,只用于学习,没有任何其他目的,如果有版权问题,请跟我联系,如果对资料有什么疑问，可以留言！
我的email:[email protected]
对于document.compatMode，很多朋友可能都根我一样很少接触，知道他的存在却不清楚他的用途。今天在ext中看到 document.compatMode的 使用，感觉这个对于我们开发兼容性的web页面还是很有帮助，我们都知道，IE对盒模型的渲染在 Standards Mode和Quirks Mode是有很大差别的，在Standards Mode下对于盒模型的解释和其他的标准浏览器是一样，但在Quirks Mode模式下则有很大差别，而在不声明Doctype的情况下，IE默认又是Quirks Mode。所以为兼容性考虑，我们可能需要获取当前的文档渲染方式。
document.compatMode正好派上用场，它有两种可能的返回值：BackCompat和CSS1Compat，对其解释如下：
BackCompat Standards-compliant mode is not switched on. (Quirks Mode)
CSS1Compat Standards-compliant mode is switched on. (Standards Mode)
在实际的项目中，我们还需要在获取浏览是否IE，这样就可以得到IE的渲染模式了。在Ext中的代码：isBorderBox=isIE&&!isStrict。
当文档有了标准声明时， document.compatMode 的值就等于 "CSS1compat"， 因此， 我们可以根据 document.compatMode 的值来判断文档是否加了标准声明
var height = document.compatMode=="CSS1Compat" ? document.documentElement.clientHeight : document.body.clientHeight;
浏览器的两种模式
在看js代码时，有时会看到关于quirks mode(怪异模式)和strict mode(严格格式)的东西，一直也没深究怎么回事，只是零零碎碎的有些概念，最近终于受不了这种似懂非懂的感觉，决定好好学习总结一下。
1、quirks mode和strict mode是浏览器解析css的两种模式，或者可以称之为解析方法。目前正在使用的浏览器这两种模式都支持 。
2、历史原因。
当早期的浏览器Netscape 4和Explorer 4对css进行解析时，并未遵守W3C标准，这时的解析方式就被我们称之为quirks mode(怪异模式),但随着W3C的标准越来越重要，众多的浏览器开始依照W3C标准解析CSS，仿照W3C标准解析CSS的模式我们叫做strict mode(严格模式).
3、后来的浏览器虽然支持strict mode，但众多浏览器并未放弃支持quirks mode。
一个重要的原因就是为了之前大量在quirks mode下开发的网页能够得到正确的显示。所以，这些支持两种模式的浏览器当拿到一张网页时，所做的一个前期工作就是判断采取何种方式进行解析(判断条件 后面会说)。注：Explorer 5仍然只支持quirks mode
4、浏览器如何判断何用哪种方式解析CSS？
解决方案就是采用doctype声明，大多数浏览器采用下面的这些判断规则
- 浏览器要使老旧的网页正常工作，但这部分网页是没有doctype声明的，所以浏览器对没有doctype声明的网页采用quirks mode解析。
- 对于拥有doctype声明的网页，什么浏览器采用何种模式解析，这里有一张详细列表可参考：http://hsivonen.iki.fi/doctype/
- 对于拥有doctype声明的网页，这里有几条简单的规则可用于判断：
对于那些浏览器不能识别的doctype声明，浏览器采用strict mode解析
在doctype声明中，没有使用DTD声明或者使用HTML4以下（不包括HTML4）的DTD声明时，基本所有的浏览器都是使用quirks mode呈现，其他的则使用strict mode解析。
可以这么说，在现有有doctype声明的网页，绝大多数是采用strict mode进行解析的。
在ie6中，如果在doctype声明前有一个xml声明(比如:<?xml version="1.0" encoding="iso-8859-1"?>)，则采用quirks mode解析。这条规则在ie7中已经移除了。
5、mozilla提出了almost strict moede ，和strict mode的区别是：
img元素在strict中是inline的，而在almost strict mode中是block的。其实我们前面所说，在大多数浏览器，大多数doctype声明触发的是almost strict mode;
6、quirks mode和strict mode最大的不同就是提现在对盒模式的解释上 ，这也是我们在js里要注意的地方。
什么是盒模式？ 这是针对块级元素说的，我这里只简单说一下(详情请查阅相关资料)。说白了就是把块级元素想像成一个装东西的盒子，而margin,padding,border,width这些css属性构成了盒模式。
而区别就是产生在width属性上：
在strict mode中 ：
width是内容宽度 ，也就是说,元素真正的宽度 = margin-left + border-left-width + padding-left + width + padding-right + border-right-width + margin-right;
在quirks mode中 ：
width则是元素的实际宽度 ，内容宽度 = width - (margin-left + margin-right + padding-left + padding-right + border-left-width + border-right-width)
这里把盒模式相关的东西记录一下，备忘 ！
·内联元素 ，例如<a>、<span>等，定义上下边界不会影响到行高（line-height），内联元素距离上一行元素的距离由行高决 定，而不是填充或边界。 注2. 内联元素（display: inline） 内联元素不需要在新行内显示，而且也不强迫其后的元素换行，如a、em、span等都为内联元素。内联元素可以为任何其他元素的子元素。
·浮动元素（无论左或者右浮动）边界不压缩 ，且若浮动元素不声明宽度，则其宽度趋向于0，即压缩到其内容能承受的最小宽度。
·如果盒中没有内容，则即使定义了宽度和高度都为100%，实际上只占0% ，因此不会被显示，此点在采取层布局的时候需特别注意。
·边界值可为负，其显示效果各浏览器可能不相同 。
·填充值不可为负 。
·边框默认的样式（border-style）为不显示（none） 。
7、在quirks mode 和 strict mode中还有一个区别 ，但没经过验证，我只是发现有这个现象。
在strict mode 中，
table的css属性font-size会继承父级元素的 ，也就是说，table中的字体大小会继承父级元素字体的大小。
在quirks mode 中，
table的css属性font-size不会继承父级元素的 ，需要专门设置一下。也就是说，table中的字体大小不会继承父级元素字体的大小。
8、在js中如何判断当前浏览器正在以何种方式解析？
document对象有个属性compatMode ,它有两个值：
BackCompat 对应quirks mode
CSS1Compat 对应strict mode
在Delphi中判断代码如下：
- procedure TDxSkinWebBrowser.CheckIfW3CStd;
- var
- compatMode: string;
- begin
- //判断文档是否有加标准声明
- //当文档有了标准声明时， document.compatMode 的值就等于 "CSS1compat"
- //否则就为BackCompat
- compatMode := FWebBrowser.oleobject.document.compatMode;
- IsW3CStd := CompareText(compatMode,'CSS1Compat') = 0;
- end;
所以，滚动控制就要加上这样一个判断，如果是标准的就使用
FWebBrowser.oleobject.document.documentelement.ClientHeight
否则就使用另一种方式：
procedure TDxSkinWebBrowser.ReSetWebSize; var WebClientWidth,WebClientHeight: Integer; MaxScrollWidth, MaxScrollHeight: Integer; webPoint: TPoint; begin if (FWebBrowser.Document <> nil) and ((FWebBrowser.Document as IHTMLDocument2).body <> nil) then begin {先获得页面的最大高度} if (FScrollBars = ssVertical) or (FScrollBars = ssBoth) then begin if IsW3CStd then //如果是W3C标准 MaxScrollHeight := FWebBrowser.oleobject.document.documentelement.ScrollHeight else MaxScrollHeight := (FWebBrowser.Document as IHTMLDocument2).body.getAttribute('ScrollHeight', 0); if MaxScrollHeight > FWebBrowser.Height then //总高度大于显示高度度出现滚动条 begin if IsW3CStd then begin WebClientHeight := FWebBrowser.oleobject.document.documentelement.ClientHeight; webPoint.Y := FWebBrowser.oleobject.document.documentelement.scrollTop; end else begin WebClientHeight := (FWebBrowser.Document as IHTMLDocument2).body.getAttribute('ClientHeight', 0); webPoint.Y := ((FWebBrowser.Document as IHTMLDocument2).body as IHTMLElement2).scrollTop; end; FVScrollBar.SetRange(0,MaxScrollHeight,webPoint.Y,WebClientHeight); FVScrollBar.Visible := true; end else FVScrollBar.Visible := False; end; if (FScrollBars = ssHorizontal) or (FScrollBars = ssBoth) then begin if IsW3CStd then //如果是W3C标准 MaxScrollWidth := FWebBrowser.oleobject.document.documentelement.ScrollWidth else MaxScrollWidth := (FWebBrowser.Document as IHTMLDocument2).body.getAttribute('ScrollWidth', 0); //总宽度大于显示宽度,出现滚动条 if MaxScrollWidth > FWebBrowser.Width then begin if IsW3CStd then begin WebClientWidth := FWebBrowser.oleobject.document.documentelement.ClientWidth; webPoint.x := FWebBrowser.oleobject.document.documentelement.ScrollLeft; end else begin WebClientWidth := (FWebBrowser.Document as IHTMLDocument2).body.getAttribute('clientWidth', 0); webPoint.x := ((FWebBrowser.Document as IHTMLDocument2).body as IHTMLElement2).scrollLeft; end; FHScrollBar.SetRange(0,MaxScrollWidth,webPoint.X,WebClientWidth); FHScrollBar.Visible := True; end else FHScrollBar.Visible := False; end; end; end; |