使用NetAPI进行CAD打印，有兴趣的交流交流

3xxx

这个有空学习一下。

sdaulj

路过并表示强烈支持！

革天明

雪山飞狐_lzh 发表于 2010-12-17 15:56
打印这部分因为自己不需要所以一直懒得看，呵呵
欢迎水手多发相关的文章和代码

请问lisp如何调用.net的命令？如果有参数如何调用？

ivde

革天明 发表于 2015-10-8 09:35
请问lisp如何调用.net的命令？如果有参数如何调用？

CommandMethod 定义的还有参数？

yshf

学习学习再学习

menethil

怎么自定义的图幅打不出来？

Leo1980

sailorcwx 发表于 2011-2-17 15:06

很不错的文章，受益匪浅
论坛是否把【i】(英文中括号中间i)吃了
resultPline.AddVertexAt(i, new Point2d(plinePoints.X, plinePoints.Y)
plinePoints.X是不是应该为plinePoints【i】.X

zjh2785

后面打印的代码呢？

慢慢来吧

有意思吗，标题上的内容就不放，与题不合。

TiStars

我狗尾续貂一下：

• 如果在模型空间打印，且需要选定范围，根据我自己的经验，选定的坐标不能直接设置给SetPlotWindowArea ，否则打印出来的都是空白，需要按照这里说的作一下转换。
  

----------------------------------------------------------------

1. // Gets the current view
   
2. ViewTableRecord acView = acDoc.Editor.GetCurrentView();
   
3. Extents3d eExtents = new Extents3d(new Point3d(0, 0, 0), new Point3d(630, 445.5, 0));
   
4. 
   
5. // Translates WCS coordinates to DCS
   
6. Matrix3d matWCS2DCS;
   
7. matWCS2DCS = Matrix3d.PlaneToWorld(acView.ViewDirection);
   
8. matWCS2DCS = Matrix3d.Displacement(acView.Target - Point3d.Origin) * matWCS2DCS;
   
9. matWCS2DCS = Matrix3d.Rotation(-acView.ViewTwist,
   
10.                                acView.ViewDirection,
    
11.                                acView.Target) * matWCS2DCS;
    
12. 
    
13. // Tranforms the extents to DCS
    
14. matWCS2DCS = matWCS2DCS.Inverse();
    
15. eExtents.TransformBy(matWCS2DCS);
    
16. 
    
17. // Defines the area to output
    
18. acPlSetVdr.SetPlotType(acPlSet, Autodesk.AutoCAD.DatabaseServices.PlotType.Window);
    
19. acPlSetVdr.SetPlotWindowArea(acPlSet, new Extents2d(eExtents.MinPoint.X, eExtents.MinPoint.Y,
    
20.                                                     eExtents.MaxPoint.X, eExtents.MaxPoint.Y));

// Gets the current view<br /> ViewTableRecord acView = acDoc.Editor.GetCurrentView();<br /> Extents3d eExtents = new Extents3d(new Point3d(0, 0, 0), new Point3d(630, 445.5, 0));<br /> <br /> // Translates WCS coordinates to DCS<br /> Matrix3d matWCS2DCS;<br /> matWCS2DCS = Matrix3d.PlaneToWorld(acView.ViewDirection);<br /> matWCS2DCS = Matrix3d.Displacement(acView.Target - Point3d.Origin) * matWCS2DCS;<br /> matWCS2DCS = Matrix3d.Rotation(-acView.ViewTwist,<br />                                acView.ViewDirection,<br />                                acView.Target) * matWCS2DCS;<br /> <br /> // Tranforms the extents to DCS<br /> matWCS2DCS = matWCS2DCS.Inverse();<br /> eExtents.TransformBy(matWCS2DCS);<br /> <br /> // Defines the area to output<br /> acPlSetVdr.SetPlotType(acPlSet, Autodesk.AutoCAD.DatabaseServices.PlotType.Window);<br /> acPlSetVdr.SetPlotWindowArea(acPlSet, new Extents2d(eExtents.MinPoint.X, eExtents.MinPoint.Y,<br />                                                     eExtents.MaxPoint.X, eExtents.MaxPoint.Y));

------------------------------------------------


而且，按照上述操作进行Extents3d转换时，要注意第一个参数的坐标值要小于第二个参数的坐标值。

不过我只知其然而不知其所以然，请高手帮忙解释一下，谢谢。

• 另外还想起来一个，如果把后台打印设为前台，则会大大提高打印速度。
  

1. //保存App的原参数
   
2. short bgPlot =(short)Application.GetSystemVariable("BACKGROUNDPLOT");
   
3. //设定为前台打印，加快打印速度
   
4. Application.SetSystemVariable("BACKGROUNDPLOT", 0);

//保存App的原参数<br /> short bgPlot =(short)Application.GetSystemVariable("BACKGROUNDPLOT");<br /> //设定为前台打印，加快打印速度<br /> Application.SetSystemVariable("BACKGROUNDPLOT", 0);

• 刚刚又遇到一个问题，看了楼主的这一条解决了，不过我没有RefreshLists就可以获取到图纸列表。
  

2）GetCanonicalMediaNameList 读取打印机的图纸列表。一般在读取图纸列表之前，我们先使用SetPlotConfigurationName设置打印机，图纸大小设置为null，然后调用RefreshLists刷新图纸列表，然后再进行读取。