您好 我创建了这个函数,它允许我从geckobowser中的所选对象创建一个文档:
function TForm6.creer_doc(node:nsIDOMNode):nsIDOMDocument;
var
Next: nsIDOMNode;
nName: IInterfacedString;
TN: TTreeNode;
begin
node:=GeckoBrowser1.ContentWindow.GetSelection.GetRangeAt(0).StartContainer;
if not Assigned(node) then exit;
nName:=NewString;
Next:=node;
while Assigned(Next) do
begin
Fdoc.DocumentElement.AppendChild(Next);
if Next.HasChildNodes then
begin
creer_doc(Next.FirstChild);
end;
Next:=Next.NextSibling;
end;
Result:=Fdoc;
end;
但显然我的论文中没有任何内容.Fdoc.Merci帮助我创建一个nsIDOMDocument。