首页 > 解决方案 > EIntfCastError '不支持接口'

问题描述

我正在尝试通过调用上面的代码从我的硬盘驱动器中保存和加载一个 xml 文件

  TS.SaveToFile(Def_Response_XmlFile, TEncoding.UTF8);
  XMLResponseDoc := LoadResponseDoc(Def_Response_XmlFile);

但是当我调用以下函数时

    function LoadResponseDoc(const FileName: string): IXMLResponseDoc;
begin
  ShowMessage('' +FileName);
  ShowMessage('' +TXMLResponseDoc);
  ShowMessage('' +TargetNamespace);
  Result := LoadXMLDocument(FileName).GetDocBinding('ResponseDoc', TXMLResponseDoc, TargetNamespace) as IXMLResponseDoc;
  ShowMessage('arrive here');
end;

我把提到的错误作为回应。任何想法我做错了什么?

标签: delphi-10.3-rio

解决方案


推荐阅读