haha 发表于 2004-11-25 19:56:00

[LISP]如何实现自动打印dwg文件

各位高手,谁能帮我忙编一个能自动打印图形的lsp程序吗?可谈报酬,如您在广州,请你吃饭!我是从事房产测绘的,有大量的宗地图需要打印。十分感谢。


1.目的:打开图形文件,发命令即可自动打印。


2.要求:由于每个图形的坐标都不同,需要自动搜寻当前图形文件的最小x,y坐标值以及最大的x,y坐标值。用拉窗口方式按A4纸张比例1:1纵向打印,其他不考虑。


如:矩形 0,0 200,0 200,287 0,287       我要在某纸张打印它!某页边距要小于5mm哦


(附:要是各位没空,请教应用什么函数如何获得当前图形的最小和最大坐标值。)

cqnj023 发表于 2004-11-25 21:35:00

(getvar "EXTMIN")获得左下角点,(getvar "EXTMAX")获得右上角点

haha 发表于 2004-11-25 22:01:00

2楼的朋友,我注意到,给你鲜花,你会拥有5元现金哦!在此非常感谢!

haha 发表于 2004-11-26 19:15:00

请问还有那位高手能写一段程序吗?我想了好久。弄得长长的。

CADghost 发表于 2004-11-28 08:42:00

1.把所有的图框(矩形)设为指定的色,比如215号,(只有图框是这种色)


2.查找全图,找到所有的215色的矩形,返回端点,窗选打印


图框宽度/绘图比例以确定图框是几号

yinheng 发表于 2004-12-2 10:20:00

我有这程序,像你说的完全没问题,我最大打印的图纸量是每次80张,仅仅由于模型空间图纸太多了操作不方便,理论上再多图纸也没问题。能说说你的报酬吗?可以是多方面的。(西安,一堪)

ZZXXQQ 发表于 2004-12-2 12:49:00

有那么难吗?下面的程序就参满足楼主的要求。


       

wengsg 发表于 2004-12-24 20:15:00

你们何不用用布局呢?为什么还要去编程呢?

ding9736 发表于 2005-2-4 16:48:00

如果你的图框是做成块,并将块名命名为"A3"或"A4"开头的,我就可以做到将A3或A4的图自动列印


我的E-mail:ding9736@sina.com


QQ:89538427

jintly 发表于 2005-4-1 18:42:00

wengsg发表于2004-12-24 20:15:00static/image/common/back.gif你们何不用用布局呢?为什么还要去编程呢?


<BR>首先,布局的话我们得把布局一个一个的做好,这本身就是一个重复的劳动过程。


其次,用持续的话,布局也是不用的,完全可以自动输出打印的。


建议用晓枫的批量打印软件。
页: [1] 2 3
查看完整版本: [LISP]如何实现自动打印dwg文件