[求助]：如何量弧段的距离？

wang0084

标注里有弧长测量

HLB_Konan

是这样的 lengthen 可以测得弧长 标注就不知道 可能有大侠知道 忘了在谁的帖子里面看见过 :)

ganok

cad2006以上有命令直接标注。

bluelover3

高版本CAD，在对象特性里有弧长半径等参数

HLB_Konan

最初由 ganok 发布
[B]cad2006以上有命令直接标注。 [/B]

请告知小弟 是何命令 直接标注弧长的 而不是度数的 先谢谢了

鬼魔

dar
li可以查询长度

oygn

特性里不就有弧长？

HLB_Konan

6楼 7楼的大侠  看清楚点好吗？人家问的是标注 不是查询 跑题还这么有理？

liuxiaoxia2005

只是写上L=123M不就行了吗

jbgs

如何量弧段的距离？[/COLOR]
大家想多了，是弧二端点之间的距离也，用普通的尺寸标注就够了,

不对？！那请问，什么叫“距离”？？？
*-*5 *-*5 *-*5

HLB_Konan

我认为是弧长 用标注可以标注角度 弧长需要换算 当然查弧长的方法不要太多了

鬼魔

DAR试了没
用过这东西没
跑什么题

seasidevillage

最初由 鬼魔 发布
[B]DAR试了没
用过这东西没
跑什么题 [/B]

请指教 dar 是什么命令？在cad中是未知命令
如果你说的是 dimangular  很遗憾 只能测角度
如果 dar 是另外一个命令 请赐教

土豆王子

;==============================
;          弧长标注
;==============================
(defun C:hu (/ obj sel el e r ang angs ange larc pnt multi)
  (setvar "CMDECHO" 0)
  (setq multi (getvar "dimlfac"));;;add 2002.5.15 can remove
  (setq obj (entsel "\n选择圆弧:<Exit> "))
  (setq sel (car obj))

  (setq pnt (getpoint "标注放置位置"))

  (terpri)
  (if (/= sel nil)
    (progn
      (setq el (entget sel))

      (setq e (assoc 0 el))
      (if (= "ARC" (cdr e))
        (progn
          (setq r (assoc 40 el))
          (setq r (cdr r))
          (setq angs (assoc 50 el))
          (setq angs (cdr angs))
          (setq ange (assoc 51 el))
          (setq ange (cdr ange))
          (setq ang (- ange angs))
          (if (< ang 0)
            (setq ang (- (* 2 pi) (abs ang)))
          )
          (setq larc (* r ang))
          (setq larc (* larc multi));;;add 2002.2.20 can remove
                                   ;;;add muti as multiple
          ;;;(princ "Angle = ")
          ;;;(prin1 (* (/ ang pi) 180))
          ;;;(princ " , Radius = ")
          ;;;(prin1 r)
          ;;;(princ "\nLength of ARC is : ")
          ;;;(prin1 larc)


        )
        (princ "Object is not a ARC !")
      )
    )
  )
  (setq larc  (rtos larc 2 1) )
(command "dimangular"  obj  "t" larc pnt )
  (princ)
)