乐筑天下

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

[编程交流] 扩展DXF代码列表

[复制链接]
Lukijan

3

主题

11

帖子

8

银币

初来乍到

Rank: 1

铜币
15
发表于 2022-7-6 07:36:09 | 显示全部楼层 |阅读模式
你好，世界！
 
有什么方法可以扩展DXF代码列表吗。我想添加一些东西到块，但我不想使用属性添加它。
 
我想做的是这样的东西
 
  1. ((-1 . <Entity name: 719e5b0>) (0 . "INSERT") (5 . "16F") (67 . 0) (8 . "0") (410 . "Model") (62 . 256) (6 . "ByLayer") (370 . -1) (347 . <Entity name: 0>) (284 . 0) (48 . 1.00000) (60 . 0) (66 . 1) (2 . "_LC_I_300_p") (10 -114652. -74554.7 0.000000) (41 . 20.3568) (42 . -25.0545) (43 . 1.00000) (50 . 0.000266536) (70 . 1) (71 . 1) (44 . 0.000000) (45 . 0.000000) (210 0.000000 0.000000 1.00000) [color="red"](4000 . "SOMETHING")[/color])

 
 
我试过了
  1. (append (entget(car(entsel))) '((4998 . "SOMETHING")))

 
我得到了
  1. ((-1 . <Entity name: 719e5b0>) (0 . "INSERT") (5 . "16F") (67 . 0) (8 . "0") (410 . "Model") (62 . 256) (6 . "ByLayer") (370 . -1) (347 . <Entity name: 0>) (284 . 0) (48 . 1.00000) (60 . 0) (66 . 1) (2 . "_LC_I_300_p") (10 -114652. -74554.7 0.000000) (41 . 20.3568) (42 . -25.0545) (43 . 1.00000) (50 . 0.000266536) (70 . 1) (71 . 1) (44 . 0.000000) (45 . 0.000000) (210 0.000000 0.000000 1.00000) (4998 . "SOMETHING"))

 
但是当我和
  1. (setq a(entsel))   ;and select same block
  2. (setq alist (entget(car a)))

 
我只有
  1. ((-1 . <Entity name: 719e5b0>) (0 . "INSERT") (5 . "16F") (67 . 0) (8 . "0") (410 . "Model") (62 . 256) (6 . "ByLayer") (370 . -1) (347 . <Entity name: 0>) (284 . 0) (48 . 1.00000) (60 . 0) (66 . 1) (2 . "_LC_I_300_p") (10 -114652. -74554.7 0.000000) (41 . 20.3568) (42 . -25.0545) (43 . 1.00000) (50 . 0.000266536) (70 . 1) (71 . 1) (44 . 0.000000) (45 . 0.000000) (210 0.000000 0.000000 1.00000))
回复

使用道具 举报

MSasu

35

主题

2471

帖子

2447

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
174
发表于 2022-7-6 07:55:02 | 显示全部楼层
似乎您希望向实体添加一些用户数据，对吗？请在AutoLISP帮助中查看扩展数据管理。您还需要为数据注册一个应用程序名（APPID表）。
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 08:13:16 | 显示全部楼层
使用扩展数据，以下是一个教程：
 
http://www.afralisp.net/autolisp/tutorials/extended-entity-data-part-1.php
回复

使用道具 举报

Lukijan

3

主题

11

帖子

8

银币

初来乍到

Rank: 1

铜币
15
发表于 2022-7-6 08:34:31 | 显示全部楼层
真 的！我本以为会有一些答案，但这太糟糕了！非常感谢！：D
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 08:38:23 | 显示全部楼层
非常欢迎你，陆吉健。
 
根据需要存储的数据量，您可能还需要查看字典，因为字典对可能存储的数据量有更高的限制。
回复

使用道具 举报

返回列表 发帖

发表回复

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

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-10 04:55 , Processed in 0.423188 second(s), 62 queries .

© 2020-2025 乐筑天下

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