乐筑天下

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

[编程交流] 查找半径弧

[复制链接]
wimal

171

主题

447

帖子

276

银币

中流砥柱

Rank: 25

铜币
860
发表于 2022-7-6 06:47:35 | 显示全部楼层 |阅读模式
我怎样才能找到弧的半径
回复

使用道具 举报

gS7

35

主题

244

帖子

212

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
180
发表于 2022-7-6 06:52:48 | 显示全部楼层
简单：
  1. (vla-get-radius object)

另一个
  1. (vlax-get object 'Radius)

 
 
试着倒在物体上，你们可以在这里找到弧半径
 
  1. Command: (vlax-dump-object object)
  2. ; IAcadArc: AutoCAD Arc Interface
  3. ; Property values:
  4. ;   Application (RO) = #<VLA-OBJECT IAcadApplication 00d73d3c>
  5. ;  ArcLength (RO) = 855.845
  6. ;   Area (RO) = 99636.1
  7. ;   Center = (214569.0 3.13291e+006 0.0)
  8. ;   Document (RO) = #<VLA-OBJECT IAcadDocument 01b8ed40>
  9. ;   EndAngle = 3.01769
  10. ;   EndPoint (RO) = (214143.0 3.13296e+006 0.0)
  11. ;   Handle (RO) = "889B24"
  12. ;   HasExtensionDictionary (RO) = 0
  13. ;   Hyperlinks (RO) = #<VLA-OBJECT IAcadHyperlinks 1869af04>
  14. ;   Layer = "Csl"
  15. ;   Linetype = "ByLayer"
  16. ;   LinetypeScale = 1.0
  17. ;   Lineweight = -1
  18. ;   Material = "ByLayer"
  19. ;   Normal = (0.0 0.0 1.0)
  20. ;   ObjectID (RO) = 697240288
  21. ;   ObjectName (RO) = "AcDbArc"
  22. ;   OwnerID (RO) = 698100984
  23. ;   PlotStyleName = "Color_6"
  24. ;  [color="blue"] Radius = 429.555[/color]
  25. ;   StartAngle = 1.02529
  26. ;   StartPoint (RO) = (214792.0 3.13328e+006 0.0)
  27. ;   Thickness = 0.0
  28. ;   TotalAngle (RO) = 1.9924
  29. ;   TrueColor = #<VLA-OBJECT IAcadAcCmColor 1e98ea60>
  30. ;   Visible = -1
回复

使用道具 举报

wimal

171

主题

447

帖子

276

银币

中流砥柱

Rank: 25

铜币
860
发表于 2022-7-6 06:56:54 | 显示全部楼层 
  1. (setq ent ([b][color=blue]ssget[/color][/b]))       (setq arc (entlast))    ;object entith

我的代码中有一些错误。
我只想选取一个弧并获得实体名称。
但ssget并没有这样做。在cad绘图上选择圆弧的正确代码是什么。
回复

使用道具 举报

gS7

35

主题

244

帖子

212

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
180
发表于 2022-7-6 07:04:38 | 显示全部楼层
试试这个Wimal
  1. (setq ss (car (entsel "\nSelect Arc:")))
  2.         (setq ename(vlax-ename->vla-object ss))
  3.         (setq r (vla-get-radius ename))

 
或使用ssget进行单选
 
  1. (setq ss (ssget ":S"))
  2.          (setq ename(vlax-ename->vla-object (ssname ss 0)))
  3.          (setq r (vla-get-radius ename))
回复

使用道具 举报

Costinbos77

56

主题

284

帖子

231

银币

后起之秀

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

铜币
289
发表于 2022-7-6 07:08:35 | 显示全部楼层
Ssget函数创建了许多选择。
使用entsel，只选择一个对象。
回复

使用道具 举报

gS7

35

主题

244

帖子

212

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
180
发表于 2022-7-6 07:12:13 | 显示全部楼层
谢谢你的提示Costinbos77
回复

使用道具 举报

wimal

171

主题

447

帖子

276

银币

中流砥柱

Rank: 25

铜币
860
发表于 2022-7-6 07:22:17 | 显示全部楼层
谢谢大家。我得到了答案
回复

使用道具 举报

gS7

35

主题

244

帖子

212

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
180
发表于 2022-7-6 07:25:40 | 显示全部楼层
很乐意帮忙！！
回复

使用道具 举报

wimal

171

主题

447

帖子

276

银币

中流砥柱

Rank: 25

铜币
860
发表于 2022-7-6 07:33:37 | 显示全部楼层
我需要更多的帮助。使用此代码，如果我选择一行；这个计划将会失败。实际上，我想选择两条线和
圆弧，如果对象是圆弧，则获取其半径
回复

使用道具 举报

LibertyOne

7

主题

143

帖子

136

银币

初来乍到

Rank: 1

铜币
36
发表于 2022-7-6 07:36:09 | 显示全部楼层
您是否考虑过用户可以选择多个弧的可能性？然后程序会返回圆弧的所有半径吗？你怎么知道哪个半径属于哪个弧？
回复

使用道具 举报

12下一页
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-10 14:45 , Processed in 0.561301 second(s), 72 queries .

© 2020-2025 乐筑天下

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