新手求助：关于Interface

Question

如下控制台中的代码：var
  myDoc : TXmlDocument;
  ch : Char;
  root : IXMLNode;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  myDoc := TXmlDocument.Create(Nil);
  CoInitialize(Nil);
  myDoc.LoadFromFile('F:\cgmlTest.xml');
  myDoc.Active := TRUE;  try
    root := myDoc.DocumentElement;////////////////出现异常
  Except
    On E:Exception Do
      WriteLn('Error occurs!');
  End;
  myDoc.Free;
  WriteLn('Press Enter to exit');
  ReadLn(ch);
end.请问root作为Interface应该怎么用？机理何在？

Answer 1

procedure TForm1.FormCreate(Sender: TObject);
var
  xmldoc:TXMLDocument;
  inode:IXMLNode;
begin
  xmldoc:=TXMLDocument.Create(self);
  xmldoc.LoadFromFile('c:\3dsmax6\plugcfg\IGameProp.xml');
  inode:=xmldoc.DocumentElement;
  ShowMessage(inode.XML);
  inode:=nil;
  xmldoc.Free;
end;