[求助]：有什么方法能达到图示黄颜色标注效果

xiaotang · 发表于 2005-10-11 10:15:20

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

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

×

我想将多段线各端点的竖直标高自动或手动标注出来，效果如图中黄颜色的数字，怎样才能达到？谢谢，要求数字垂直书写

guohui.zhai · 发表于 2005-10-11 15:21:31

CAD本身就能作出这样的东本呀,看一下CAD的帮助吧.在帮助里找一下坐标标注.

xiaotang · 发表于 2005-10-11 17:28:32

CAD中自带的坐标标注，只是在标注水平方向时，显示的数字才是竖直的，而我想要的的标注竖直方向的尺寸，并且要求标注的数字是竖直的
就是想达到图示效果

xiaotang · 发表于 2005-10-14 14:25:21

这个应该不难吧，非常着急，迫切希望找到答案

LUCAS · 发表于 2005-10-14 16:29:29

QDIM就能有这效果

xiaotang · 发表于 2005-10-14 16:54:19

谢谢，请注意看红、黄颜色的数值，用快速标注（QDIM）是达不到要求的，红颜色的数值应该是0，200，400，600，800，而不是0，100，300，500，700

LUCAS · 发表于 2005-10-14 17:17:21

;;先用QDIM标注
;;临时改的
(defun C:TTT (/ SS SSS N)
(PROMPT "选要改的标注: ")
(setq SSS (ssget '((0 . "DIMENSION")))
N 0
)
(repeat (sslength SSS)
(setq SS (entget (ssname SSS N)))
(entmod (subst (cons 1 (rtos (caddr (assoc 13 SS))))
(assoc 1 SS)
SS
)
)
(setq N (1+ N))
)
(princ)
)

xiaotang · 发表于 2005-10-14 17:23:55

谢谢。就是这种效果，但我不会改请再帮助改改
有两个问题
1、就是改为全选，能够一次完成，
2、调整后，不能实现标注关联，此时变化多段线，标注结果没有变化，最好能实现标注关联
太谢谢了，以前做这样的事情都是逐个输入数值，几百的数，非常麻烦，这会终于找到简便方法了，谢谢
发现一个问题，就是标注替代后，标注样式对改变后的标注没有作用，例如改变后标注为200，想通过更改标注样式，使200变为20不能实现，只能炸开标注，然后用计算器计算调整

LUCAS · 发表于 2005-10-15 13:11:12

1、就是改为全选，能够一次完成，
(defun C:TTT (/ ENT SS)
(setq ENT (entlast))
(vl-cmdf "qdim" (ssget) "" "o")
(prompt "\n指定標註線位置: ")
(command PAUSE)
(if (/= (entlast) ENT)
(while (setq ENT (entnext ENT))
(setq SS (entget ENT))
(entmod
(subst (cons 1 (rtos (caddr (assoc 13 SS)) 2 (getvar "LUPREC")))
(assoc 1 SS)
SS
)
)
)
)
(princ)
)
2、调整后，不能实现标注关联，此时变化多段线，标注结果没有变化
=>因是直接改數值,所以不能关联,重標一次吧!

狂刀 · 发表于 2005-10-15 20:46:37

用扩展数据应该可以保持关联吧?:)

(defun C:TT (/ ENT SS)
(setvar "DIMASSOC" 2)
(setq ss (ssadd)
ENT (entlast))
(vl-cmdf "qdim" (ssget) "" "o")
(prompt "\n指定標註線位置: ")
(command PAUSE)
(if (/= (entlast) ENT)
(progn(while (setq ENT (entnext ENT))
(setq SS (ssadd ent ss))
)
;(setq lp (getvar "LUPREC"))
(command ".DIMOVERRIDE" "dimdec" 3 "dimzin" 0 "" ss "")
)
)
(princ)
)

sdwy19691229 · 发表于 2005-10-17 23:55:02

有这样标数的吗????

xiaotang · 发表于 2005-10-18 10:56:59

最初由 sdwy19691229 发布
[B]有这样标数的吗???? [/B]

我是做热力行业的，一般绘制管道纵剖面图时，需要标注管道中心标高等数据，我一般是这样操作的：
1、在EXCEL中计算得到所有管道中心标高的数值，并得到相应的坐标
2 、在CAD中根据这些坐标，用多段线绘制出管道中心标高的标高线
3、在标高线下，各个对应的坐标点处，一般也就是管道支架的位置，要求竖直书写相应的坐标数值，以前碰到这种情况，由于没有相关软件绘制，我都是执行第一、二步，然后在相应坐标的地方，复制粘贴数据，然后再参照EXCEL中的数据，逐个更改。现在有了这个程序，我就可以一次标注所有的管道中心标高数值，并且便于检查，非常方便
之所以这个程序方便使用，主要在于我的行业，所有的直线绘制都是按照比例进行的，有了这个，标高数据就很方便了，这是我现在认为的最适合我工作的方法。

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

[求助] [求助]：有什么方法能达到图示黄颜色标注效果

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

相关帖子