怎么使用ole动态的创建autocad的对象？

[xuhongli_1978]

『olecontainer1.CreateObject('word.document',true)，』可以动态的创建ole的word文档，要是动态的创建autocad怎么办？

[sixgj]

一个意思哩。

[yourport]

没有能过，帮你顶

[ekin]

没试过

[angelior]

CAD和WORD用OLE的話
是同等的

[wjpop3]

应该一样吧

[IORILI]

delphi打开autocad，是要分不同版本的：
acad14、acad－2000：
uses
comobj,activex,olectrls;

var
p1,p2:olevariant;
acad,activedoc:olevarant:
//创建variant数组来保存窗口坐标
p1:=vararraycreate([0,2],vt_r8);
p2:=vararraycreate([0,2],vt_r8);
//设定数值
p1[0]:=14330.0;
p1[1]:=4000.0;
p1[2]:=0;
p2[0]:=26400.0;
p1[1]:=8500.0;
p1[2]:=0;
acad:=createoleobject('autocad.application');
如果是acad14的话
acad:=createoleobject('autocad.application.14');

[IORILI]

接上面：
if no tvarisempty(acad) then
acad.visible:=visible;
//打开文件
activedoc:=acad.documents.open('e:\planview.dwg');
//放大
acad.zoomextents;
acad.zoomwindow(vararrayref(p1),vararrayref(p2));