乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 111|回复: 9

[求助]弧长的标注

[复制链接]

1

主题

3

帖子

1

银币

初来乍到

Rank: 1

铜币
7
发表于 2005-10-12 16:00:00 | 显示全部楼层 |阅读模式
诸位大虾,有知道在CAD中标注弧长,以及曲线的办法么?计算的不要,偶会!最好是象标注线段距离那样简单就好
回复

使用道具 举报

20

主题

206

帖子

3

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
286
发表于 2005-10-13 07:29:00 | 显示全部楼层
可惜哦  CAD中没有  单位电脑里好象有个资料可以自己做一个标注弧长的按钮 我翻出来发给你
回复

使用道具 举报

9

主题

37

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
73
发表于 2005-10-13 09:18:00 | 显示全部楼层
最简单的方法是先把圆弧的角度标出,然后再改为长度。

53fiqq1ih5k.jpg

53fiqq1ih5k.jpg

回复

使用道具 举报

46

主题

150

帖子

8

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
339
发表于 2005-10-13 09:28:00 | 显示全部楼层
如果“要象标注线段距离那样简单”,可能需要进行一些编程工作。
回复

使用道具 举报

1

主题

3

帖子

1

银币

初来乍到

Rank: 1

铜币
7
发表于 2005-10-13 11:17:00 | 显示全部楼层
2楼的大虾好。谢谢,我的电邮是westwolf1215@sohu.com
ljizhu@haida.cn



回复

使用道具 举报

20

主题

206

帖子

3

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
286
发表于 2005-10-13 21:37:00 | 显示全部楼层

mathyeppmyc.gif

mathyeppmyc.gif

回复

使用道具 举报

3

主题

20

帖子

2

银币

初来乍到

Rank: 1

铜币
32
发表于 2005-10-14 10:58:00 | 显示全部楼层
3楼的,,你那是咋弄的,,,看不懂,
回复

使用道具 举报

0

主题

1

帖子

1

银币

初来乍到

Rank: 1

铜币
1
发表于 2005-10-14 21:22:00 | 显示全部楼层
三楼的哪个图就是用角度标注好了以后,把角度改成你所表示的长度了。
回复

使用道具 举报

4

主题

47

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
63
发表于 2005-10-16 00:13:00 | 显示全部楼层
天正有这个功能。
回复

使用道具 举报

0

主题

3

帖子

3

银币

初来乍到

Rank: 1

铜币
3
发表于 2005-10-18 23:43:00 | 显示全部楼层
;==============================
;          弧长标注
;==============================
(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 "\nSelect ARC: "))
  (setq sel (car obj))
  
  (setq pnt (getpoint "point"))
   
  (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 (
   
)
(princ "Object is not a ARC !")
      )
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-11 03:19 , Processed in 0.933970 second(s), 75 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表