[编程申请]：再求画用地红线图自动标注的程序

mchong1201 · 发表于 2005-12-27 18:31:58

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

本人在规划局工作，经常要画用地红线图，求程序：只需用鼠标点击几个图上的点，可自动标出点坐标，自动按顺序用红线连接，并标出每段红线的长度，并计算面积。
其实这个帖子已经有人发过了，而且eachy 斑竹还做了Lisp，还是精华贴子。
只是我下载却无法用，因为不知道命令是什么，而且也不用晓东工具箱的！我只要单独能加载的程序，不要用到晓东工具箱！非常感谢！

xxming · 发表于 2005-12-27 19:42:33

eachy斑竹我也需要,请你改一下程序,谢谢(不用晓东工具箱的！我只要单独能加载的程序)

雨中漫步0423 · 发表于 2005-12-27 22:28:53

我画总图,也很想要一个这样的LSP,单独加载的

eachy · 发表于 2005-12-28 01:21:57

命令：Redln

输入 (setq $xdtb_globle_scale 1.0) 或者其他数字控制文字高度。

mchong1201 · 发表于 2005-12-28 09:43:14

首先非常感谢eachy 斑竹!我下来试了!还有几点想请斑竹帮忙,1、能否去掉长度标注，2、坐标、文字的高度任何调整？3、命令能否简化，4、在画转弯半径的时候如何选择圆弧，我试了在直线段画是没问题的！多谢了！！

eachy · 发表于 2005-12-28 11:03:57

1 可以
2 输入 (setq $xdtb_globle_scale 1.0) 或者其他数字控制文字高度。字高 = $xdtb_globle_scale * 2.5
3 程序尽量采用的是不和你在使用的其他工具重名，你可以自己定义一个图标解决
4 不知你要标注弧段的哪些要素？

mchong1201 · 发表于 2005-12-28 15:07:36

我试了，面积的字高是够了，发现坐标的字高太小了，无法修改，而且无法用格式刷改坐标大小，炸开的话坐标数值字都不见了！我画红线图打印出来坐标要看的清楚的！
至于弧段的要素我不是很清楚，有些道路不是直的，照斑竹的就无法准确计算面积了！
如果麻烦就请斑竹帮我程序改一下，去掉长度标注，把坐标的改大一点，最好告诉我怎么设置坐标的比例就行了！弧段就自己慢慢画了！
谢谢eachy 斑竹了！！

eachy · 发表于 2005-12-28 16:55:48

如果你都改成闭合的Pline就简单了

mchong1201 · 发表于 2005-12-28 18:56:06

输入 (setq $xdtb_globle_scale 1.0) 或者其他数字控制文字高度。
请问eachy 斑竹这个是在CAD界面输入的吗
eachy 能帮我把去了长度标注的程序发一个吗，多谢

comechris · 发表于 2006-1-6 15:57:00

楼主不是要标注弧段，而是要把有弧段面积也可以计算出来，因为鼠标点击几个图上的点，画出来的是直线，面积是不对的，看看斑竹怎么处理下

账号		自动登录	找回密码
密码			立即注册

[编程申请]：再求画用地红线图自动标注的程序

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子