看看ACD2000安装里有没有代ACTIVEX控件,可以用。

解决方案 »

  1.   

    你能具体的指导一下吗?谢谢了
    我想在应用程序里包含ACD的图象,客户机器不需要安装ACD,行吗?
      

  2.   

    恐怕不行,除非你把cad内容读入,显示到form上。
    调用到是很简单的
    use comobjvar acad,ActiveDoc : OleVariant;acad := CreateOleObject('autocad.application');
    sleep(1000);//有时候一定要加的,根据实际情况看
    acad.visible := true;
    ActiveDoc := Acad.Documents.Open('E:\Planview.dwg'); 
    //打开cad文档
    另外你也可以导入cad的tlb库,在cad的根目录下,或者相应的.pas文件,我可以发给你,如果需要。   
      

  3.   

    恐怕不行,除非你把cad内容读入,显示到form上。
    调用到是很简单的
    use comobjvar acad,ActiveDoc : OleVariant;acad := CreateOleObject('autocad.application');
    sleep(1000);//有时候一定要加的,根据实际情况看
    acad.visible := true;
    ActiveDoc := Acad.Documents.Open('E:\Planview.dwg'); 
    //打开cad文档
    另外你也可以导入cad的tlb库,在cad的根目录下,或者相应的.pas文件,我可以发给你,如果需要。
      

  4.   

    恐怕不行吧,客户机不装acd(acd?什么东东,是cad吧),用ole也是不行的。
    你只能找能显示cad图形而又不用ole的控件了,找到的可能也不大。
      

  5.   

    要显示在form上可以用olecontainer,但必须装cad。要想不装cad可能跟本就办不到。除非自己能分析dwg的文件格式,不过好象太难了吧 ^_^
      

  6.   

    yansea(思宏) ,你最后一句的意思我没弄明白,
    按照你上边的几个步骤create,open;就可以在程序里嵌入ACD文件了吗?
    客户不需要安装ACD吧?
    你最后一句导入库是什么意思啊?
    谢谢