无法对ClientDataSet.XMLData进行赋值

var

sData :string;

begin

....

sData := cds_Query.XMLData;

cds_Temp.XMLData := sData; //此语出错，抛出以下异常

....

end;

一个非常简单的赋值语句，居然出错了，错误提示如下：



Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 007522B3 in module 'Project1.exe'.Read of address 00000000'.

这是为什么呢？因为Midas.dll没有注册！

其实只要在公共单元如uDM.pas文件中引用MidasLib单元即可，如：

uses MidasLib;

真一个弱智错误！