请问楼主,我在已经成为电脑里已经安装了CAD2005,当再想安装2006时,却出现了以上的图框,应该怎么办?
各个小程序都不错，技术正不是盖的 <P>scsg的图形转为CASS的有何快捷方便的办法</P> 楼主，我想问一下，当CASS转到ARCINFO或MAPINFO时，线型如坡、陡坎都变成了直线，能解决吗？
关于图形编组的问题
<P>楼主:</P><P> 在CASS6.0中由于很多无用编组(编组中没有实体存在),造成图形文件相当大,用LISP编程去掉多余无用的编组在数据量小的情况下处理速度还可以,但数据量大时就相当慢,有没有什么办法使程序变快?</P>
<P>或者给一个能够在写块后能保存编组在块中的方法?</P>
<P> 找到方法希望能发邮件到<A href="mailto:MAP@VIP.163.COM" target="_blank" >MAP@VIP.163.COM</A></P>
<P> 谢谢!</P> 请问:在CASS中能不能展点后按点号顺序自动连线?谢谢!有没有这样的程序? <P>楼主:您好,你在CAD方面的造诣太深了,我虚心地向您学习!你上次告诉我的高程点旋转90度的方法,很好用,我现在已经用的很好了,同时我想在这里问您另外一个问题,关于我用的一个LISP程序计算面积的,这个程序直接将面积结果,标注在了图面上,但我想能不能让这个面积值自动存到"CTRL+C"里面,这样我可以直接在EXCEL表格里"粘贴"出来,就省下了一步"选中复制"的过程!肯请楼主的指点!!</P>
<P>我的LISP计算面积的程序是</P>
<P>(defun C:MJ()<BR> (setq pt (getpoint "选取区域内一点："))<BR> (setq pt1 (getpoint "\n选写入面积值之点"))<BR>(setq old (getvar "cmdecho"))<BR>(setvar "cmdecho" 0)<BR> (command "point" (list 0 0))<BR> (setq obj (entlast))<BR> (command "Boundary" "a" "O" "R" "x" pt "")<BR> (if (= nil jd) (setq jd 2))<BR> (if (or (= nil (entnext obj))<BR> (/= "REGION" (cdr (assoc 0 (entget (entnext obj))))))<BR> (setq pp "\n无闭合区域")<BR> (progn<BR> (command "Area" "o" (entlast))<BR> (command "Erase" (entlast) "")<BR> (if (/= nil pt1)<BR> (command "text" pt1 "" "" (rtos (getvar "area") 2 jd))<BR> )<BR> (setq pp (strcat "\n面积：" (rtos (getvar "area"))))<BR> )<BR> )<BR> (command "Erase" obj "")<BR> (prompt pp)<BR>(setvar "cmdecho" old)<BR>(prin1)<BR>)</P> <P>尊敬的楼主,肯请您在百忙之中回复我的帖子,因为以上的方法对我太有用了!!!!</P> <P>你可以把显示的面积先写入到一个文本文件中，然后在EXCEL表格里统一导入外部数据应该是可以的</P> 也好让我学习学习