关于CAD二次开发，会者不难，请进！！！

Question

在Delphi下调用图形对象的SetXdata出错    错误提示：灾难性错误！    各位高手出招了！！！

Answer 1

代码如下：
  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没有问题， 怎么回事？

Answer 2

请问，您是怎样实现调用cad图形的

Answer 3

只要安装CAD后在project->import type lib...菜单可以安装CAD控件怎么回事？？？没有人知道吗？？？

Answer 4

CSDN太气人了，居然不让把贴子提前了生气ing... ...