在添加一个圆后
代码如下：
c: AcadCircle;
DataType: OLEvariant;
Data: OLEvariant;
... ...
DataType := VarArrayCreate([0, 1], varInteger);
Data := VarArrayCreate([0, 1], varVariant);
DataType[0] := 1001;
DataType[1] := 1000;
Data[0] := 'MyApp';
Data[1] := 'Test';
... ...
C.SetXData(DataType, Data); ///////////////////出错?????????????
///// 灾难性错误
///// 使用CAD提供的VBA没有问题， 怎么回事？
