Delphi 开发AutoCAD

Question

Delphi 开发AutoCAD求：利用AutoCAD 库文件开发AutoCAD的例子
只要求启动程序及控制Document则可

Answer 1

var
  Form1: TForm1;
  cad,thisdrawing:variant;
try
    cad:=CreateOleObject('AutoCAD.Application');
    showmessage(cad.name);           //显示应用程序的名字
    cad.visible:=true;               //如果delphi是由本程序启动的，启动后将看不到
                                    //cad，需要将他设置为可见的
    thisdrawing:=cad.ActiveDocument;//取得当前活动的cad文档
  except
     showmessage('无法启动AutoCAD');
     close;
  end;

Answer 2

楼上的采用的是COM组件调用，如果用库文件的话，先导入类型库。
用菜单上的Import Type Library，选中你使用的CAD的类型库，如CAD2006类型库在 
Program Files\Common Files\Autodesk Shared\acax16chs.tlb。
然后生成相应的单元文件。这样就可以像一般单元文件一样使用了。具体的属性和方法，可以参考一下CAD的开发人员帮助（CAD自带的），那里面有类型库中的类说明。注意：CAD2000、2002是R15，CAD2004、2005、2006是R16，CAD2007是R17。
对于相同的内核版本，类型库是可以通用的，不同内核不行，需要重新导入。