如何在 Delphi 7 中使用 MSXML 6.0 创建 TXML 文档?
Delphi 7 发布时 MSXML 6.0 还不存在。是否可以将 Delphi 的 TXML 文档配置为使用 MSXML 6.0 而不是旧版本?
MSXML 6.0 didn't exist when Delphi 7 was released. Is it possible to configure Delphi's TXML Document to use MSXML 6.0 instead of the older versions?
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
发布评论
评论(2)
情话墙2024-12-11 05:40:30
msxmldom.pas
单元公开一个公共 MSXMLDOMDocumentCreate
挂钩,您可以为其分配自定义处理程序,例如:
uses
..., msxmldom;
const
CLASS_DOMDocument60: TGUID = '{88D96A05-F192-11D4-A65F-0040963251E5}';
function CreateMSXML6Document: IXMLDOMDocument;
var
Disp: IDispatch;
begin
OleCheck(CoCreateInstance(CLASS_DOMDocument60, nil, CLSCTX_INPROC_SERVER or CLSCTX_LOCAL_SERVER, IDispatch, Disp));
Result := Disp as IXMLDOMDocument;
if not Assigned(Result) then
raise DOMException.Create('MSXML 6.0 Not Installed');
end;
initialization
msxmldom.MSXMLDOMDocumentCreate := CreateMSXML6Document;
~没有更多了~
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
将以下代码添加到单元名称 uMSXMLVersion 或您选择的名称中,并将其添加到您的项目中
Add the below code to a unit name uMSXMLVersion or your name of choice and add it to your projects uses