程序如何才能在CAD2004中运行
<P>各位版主及专家：新年好!</P><P> 我用VB6编了一个程序，其中需调用CAD。我机子上安装的是CAD2002。</P>
<P> 编译生成可执行文件后，程序能在任何装有CAD2002的计算机上正常运行，但在安装了CAD2004的计算机上就不行运行该程序了。我该如何办？</P>
<P> 肯请得到你们的帮助。谢谢！</P> <P>类型库的版本问题。好像有很多人问过这个问题，采用动态绑定的方法比较好。</P>
<P>变量都定义为Object，不要定义为AcadApplication</P> <P><A name=76518><FONT color=#000066><B>BigJue</B></FONT></A>：你好！</P>
<P>能说得详细点吗？我刚接触VB开发CAD，谢谢 如何用OBJECT来代替AcadApplication，在VB中引用CAD2002后生成EXE文件，在CAD2004平台上就提示类型错误，具体该怎样操作</P> 把你连接AUTOCAD这部分代码发上来看看 <P><A name=77308><FONT color=#000066><B>zxj_76</B></FONT></A>专家:你好!</P>
<P> 我在VB工具栏的"引用"栏用勾选了ＡＵＴＯＣＡＤ的相关选项，之后用了如下命令：Dim aCADline As Object<BR> <BR> Dim cad1 As Object 'AutoCAD对象<BR> Dim cad2 As Object 'AutoCAD当前绘图模型区对象<BR> Dim CADobj1 As Object, CADobj2 As Object, CADobj3 As Object '定义备用的三个CAD对象<BR> Dim CADpoint1(3) As Double, CADpoint2(3) As Double, CADpoint3(3) As Double '定义备用的三个点变量 必须只能是数据型的<BR> Dim txtMODE 'As AcadTextStyle '定义mytxt变量为文本样式<BR> CADpoint1(1) = 0: CADpoint1(2) = 0: CADpoint2(1) = 800: CADpoint2(2) = 300: CADpoint3(1) = 800: CADpoint3(2) = 1000<BR> Set cad1 = CreateObject("autocad.application"): cad1.Visible = True<BR> Set cad2 = cad1.ActiveDocument: cad1.ActiveDocument.Utility.InitializeUserInput 1 '该句命令使CAD接收VB的命令，并将在CAD中的输入传入VB的变量中</P>
<P> 进行该定义后 Dim txtMODE 'As AcadTextStyle '定义mytxt变量为文本样式<BR></P>
<P> 由于版本问题（２００２，２００４），就会出错 ，能否找到一个通用格式</P>
<P> 谢谢 <BR> </P>
页:
[1]