锐浪报表 Grid++Report 免注册DLL C/S报表开发（二）清单文件manifest分析

    锐浪报表 Grid++Report 免注册DLL，通过建立一个与执行EXE文件同名的清单文件（后缀名.manifest），实现Grid++Report发布DLL文件的COM免注册。

    其原理是，在清单文件中包含有COM组件相关的信息，由它来代替注册表的角色，来指定COM文件路径、COM版本等信息。从而实现直接复制文件发布用Grid++Report开发的软件。

    之前的文章，说明使用纯文本编辑器，修改Lserver.exe.manifest文件中的值。感觉不妥，应该通过XML控件来修改。今天，动手代码上来，完成了。下面的代码备案。

    一、清单文件（后缀名.manifest）是个XML文件

    二、文件分析

    通过本人编写的XML分析代码：

     XML文件一个根节点：assembly。根目录下有三个子节点，我们要修改的节点名：第一个节点的，名称assemblyIdentity，需要修改属性名:name 的属性值。

     三、修改代码

var i,j:integer;
    nodeList:IXMLNodeList;
    XMLRootNode,XMLnode1:IXMLNode;
    sPath,EXEFileName,LoadFileName,SaveFileName,NodeName,NodeText:string;
begin
  LoadFileName:=ReportPath+'YourX86.exe.manifest';

  XMLdocument1.FileName := LoadFileName;
  XMLdocument1.Active := True;     {激活}
  Memo1.Lines.Text := FormatXMLData(XMLdocument1.XML.Text);   // 显示原XML

  sPath:=DirectoryListBox1.Directory;                         // 尾部无
  with ClientDataSet1 do
  begin
    if RecNo>0 then
    EXEFileName:=FieldByName('文件').AsString;
  end;

  if ExtractFileExt(EXEFileName)<>'.exe'  then
  begin
    exit;
  end;
  SaveFileName:=sPath+''+EXEFileName+'.manifest';
  NodeName:='assemblyIdentity';
  NodeText:=EXEFileName;

  Memo1.Lines.Text := FormatXMLData(XMLdocument1.XML.Text);    // Memo1 显示格式化的XML
  XMLRootNode := XMLdocument1.documentElement;                 // 根节点
  try
    NodeList:=XMLRootNode.ChildNodes;                          // 第1级
    fOR I:=0 TO NodeList.Count-1 DO                            // 子节点数
    BEGIN
      XMLNode1:=NodeList.Get(i);                               // 子节点
      if XMLNode1.NodeName=NodeName then
      begin
        for J:=0 to XMLNode1.AttributeNodes.Count-1 do          // 节点的属性数循环
          if XMLNode1.AttributeNodes[j].NodeName='name' then
            XMLNode1.AttributeNodes[j].Text:=NodeText;
      end;
    end;
  except
  end;
  Memo2.Lines.Text := FormatXMLData(XMLdocument1.XML.Text);    // Memo1 显示格式化的XML
  XMLdocument1.SaveToFile(SaveFileName);                       // 保存XML文件
end;

    四、有关窗口

      说明：由于编写的c/s系统，功能窗口达到数百个，需按EXE组成模块，这样，功能模块达到几十个。

    因此，必须编写一个，统一快速创建清单的窗口。有利于编程，快速同步清单文件，当Grid++Report升级时，也能快速同步。

    窗口完成，可以将几十个EXE，一键完成对应清单的创建。