在DELPHI中操作XML的问题..

代码如下:
procedure TForm3.FormCreate(Sender: TObject);
var
path,name:string;
i:integer;
list:IXMLNodeList;
node:IXMLNode;
begin
path:=ExtractFilePath(Application.ExeName)+'conf4.xml';
FXMLDoc:=TXMLDocument.Create(nil);
  FXMLDoc.LoadfromFile(path);
  FXMLDoc.Active:=true;
  node:=FXMLDoc.DocumentElement;
  list:=node.ChildNodes;
  for i:=0 to list.Count-1 do
  begin
      if node.ChildNodes[i].Attributes['name']='lj' then
      begin
          name:=node.ChildNodes[i].ChildNodes['server'].Text;
      end;
  end;
end;

这段代码在FormCreate中运行会报以下错误[The system cannot locate the object specified]
如果放在函数中运行就没问题.. 新手..期待解决..

---

看看是那句报错

---

代码看起来没有什么问题，你放在Formshow事件看看

---

FXMLDoc.LoadfromFile(path);//错的是这句..

---

jf

---

jf

---

FXMLDoc:=TXMLDocument.Create(nil);
改为
FXMLDoc:=TXMLDocument.Create(Self);

试一下

---

你试着重启一下计算机

---

Delphi(Pascal) code:
function SaveToNewXMLDocument: IXMLDocument;
var
xml: