首页| JavaScript| HTML/CSS| Matlab| PHP| Python| Java| C/C++/VC++| C#| ASP| 其他|
购买积分 购买会员 激活码充值

您现在的位置是:虫虫源码 > 其他 > delphi控制CAD画线

delphi控制CAD画线

  • 资源大小:1.80 kB
  • 上传时间:2021-06-30
  • 下载次数:0次
  • 浏览次数:0次
  • 资源积分:1积分
  • 标      签: CAD

资 源 简 介

本程序是用Delphi7来调用CAD程序,包括打开自动CAD程序并且进行连接; 在程序中,我没有取ActiveDocument的实例句柄,而是直接取了ModelSpace的实例句柄。在生成一个三维的OleVariant双精度数组后,对它进行赋值,然后调用AddLine方法绘制一个高为2030,宽为800的长方型,并让它立即显示。 程序在后台显示后,调用保存对新生成的CAD图纸进行保存为Dwg格式; 关闭应用程序后自动关闭刚才画图的CAD窗口。  

文 件 列 表

Unit1.dfm
Unit1.pas
VIP VIP
0.192726s