function TXmlManage.DeleteApplication(xmlFile,DepartmentName,AppName:string):ixmlDomNode;safecall;
var
  Node:ixmlDomNode;
  NodePath:string;
begin
try
 NodePath:='APP/DEPARTMENT[@NAME='''+DepartmentName+''']/APPLICATION[@NAME='''+AppName+''']';
 Node:=GetNode(xmlFile,NodePath);
 if Node<>nil then
 begin
     Node.parentNode.removeChild(Node);
 end
 else
  Result:=nil;
 except
  Result:=nil;
 end;end;
关于这段  怎么都删除不 成功!!! 请教  为什么为什么???