百分求翻译一条c为delphi（跨域）
据说能够解决跨域问题，请懂c++的朋友帮忙翻译一下。原文如下：

C/C++ code

IHTMLWindow2 htmlWindow = (IHTMLWindow2)(((HTMLDocumentClass)(webBrowser1.Document.DomDocument)).frames.item(ref index));   label1.Text = CodecentrixSample.CrossFrameIE.GetDocumentFromWindow(htmlWindow).activeElement.innerHTML;  

Delphi(Pascal) code

var  htmlWindow:IHTMLWindow2;begin  htmlWindow := IHTMLWindow2((HTMLDocumentClass(webBrowser1.Document.DomDocument)).frames.item(index));     label1.Text := CodecentrixSample.CrossFrameIE.GetDocumentFromWindow(htmlWindow).activeElement.innerHTML;end;
[解决办法]
探讨

接口不熟，试一试：

Delphi(Pascal) code
var
  htmlWindow:IHTMLWindow2;
begin
  htmlWindow := IHTMLWindow2((HTMLDocumentClass(webBrowser1.Document.DomDocument)).frames.item(index));   
  label1.Text := C……

[解决办法]
你的C++代码即使是正确翻译成delphi，也未必能用。
你要实现什么功能请描述，根据你的描述即可帮你写出实现代码，而这个实现代码可能与你这两行代码完全不同。

无非就是控制外部网页之类的，用delphi很容易实现。
[解决办法]
Delphi(Pascal) code
uses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls, OleCtrls, SHDocVw_TLB, ExtCtrls, TemplatePower;var  htmlWindow:IHTMLWindow2;begin  htmlWindow := IHTMLWindow2((HTMLDocumentClass(webBrowser1.Document.DomDocument)).frames.item(index));     label1.Text := CodecentrixSample.CrossFrameIE.GetDocumentFromWindow(htmlWindow).activeElement.innerHTML;end;