关于字典对象和条目 （AutoLISP）
字典是一个容器对象，类似于符号表。 字典存储在图形的命名对象字典中，该字典是图形中所有非图形对象的根目录，或作为附加到对象的扩展字典存储。每个图形可以包含不同的词典，因此例程不应期望图形中可能存在特定的词典。可以使用 访问图形的命名对象字典中的字典，该字典返回图元名称。用于访问表示图形中所有字典的实体列表。namedobjdictentget 以下规则适用于字典对象：
可以使用 和 函数查询字典条目。每个字典条目都包含一个文本名称键和对条目对象的硬所有权句柄引用。可以通过直接将条目对象名称传递给函数来删除字典条目。文本名称键使用与符号表名称相同的语法和有效字符。可以使用该函数更改键名称。dictsearchdictnextentdeldictrename 下面的示例代码列出了绘图的命名对象字典中的每个字典及其条目： (defun c:ListDictionaries ( / ed ed1)
(prompt "\nDictionaries in current drawing: ")
(foreach ed (entget (namedobjdict))
(progn
(cond ((= (car ed) 3)
(prompt (strcat "\n" (cdr ed))))
((= (car ed) 350)
(progn
(foreach ed1 (entget (cdr ed))
(if (= (car ed1) 3)
(prompt (strcat "\n " (cdr ed1)))
)
)
))
)
)
)
(princ)
)
以下是执行后可能在“文本历史记录”窗口中看到的输出示例。c:ListDictionaries Dictionaries in current drawing: ACAD_CIP_PREVIOUS_PRODUCT_INFO ACAD_COLOR ACAD_DETAILVIEWSTYLE Imperial24 ACAD_GROUP ACAD_LAYOUT Layout1 Layout2 Model ACAD_MATERIAL ByBlock ByLayer Global ACAD_MLEADERSTYLE Annotative Standard ACAD_MLINESTYLE Standard ACAD_PLOTSETTINGS ACAD_PLOTSTYLENAME Normal ACAD_SCALELIST A0 A1 A2 A3 A4 A5 A6 A7 A8 A9 B0 B1 B2 B3 B4 B5 B6 B7 B8 B9 C0 C1 C2 C3 C4 C5 C6 C7 C8 C9 D0 D1 D2 ACAD_SECTIONVIEWSTYLE Imperial24 ACAD_TABLESTYLE Standard ACAD_VISUALSTYLE 2dWireframe Basic Brighten ColorChange Conceptual Dim EdgeColorOff Facepattern Flat FlatWithEdges Gouraud GouraudWithEdges Hidden JitterOff Linepattern OverhangOff Realistic Shaded Shaded with edges Shades of Gray Sketchy Thicken Wireframe X-Ray AcDbVariableDictionary CANNOSCALE CMLEADERSTYLE CTABLESTYLE CVIEWDETAILSTYLE CVIEWSECTIONSTYLE DIMASSOC HIDETEXT LAYEREVAL LAYERNOTIFY 相关概念本教程中的主题 |
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2024-12-15 12:55
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.
