明经通道 AutoLISP 函数	明经通道 AutoLISP 函数
dictadd

在指定词典内添加非图形对象

(dictadd ename symbol newobj)

参数

ename

要添加对象的词典名称。

symbol

添加到词典中的对象的关键字。symbol 必须为唯一名称，且不能与词典中现有的关键词重复。

newobj

要添加到词典中的非图形对象。

一般而言，每个添加到词典中的对象都必须是唯一的。在向组词典添加组对象时，尤其需要注意这个问题。使用不同的关键字来添加同一组对象，将导致组名称重复和 dictnext 函数死循环。

注意 如需要访问标题、主题、作者、关键字等图形属性，可使用 IAcadSummaryInfo 接口，它作为 AutoCAD 对象模型的  Document 对象的属性之一可被访问。

返回值

添加到词典中的对象的图元名。

示例

下面的样例创建对象，并将这些对象添加到命名对象词典。

创建表形式的词典条目：

命令： (setq dictionary (list '(0 . "DICTIONARY") '(100 . "AcDbDictionary")))

((0 . "DICTIONARY") (100 . "AcDbDictionary"))

使用 entmakex 函数创建词典对象：

命令： (setq xname (entmakex dictionary))

<图元名: 1d98950>

将该词典对象添加到命名对象词典：

命令： (setq newdict (dictadd (namedobjdict) "MY_WAY_COOL_DICTIONARY" xname))

<图元名: 1d98950>

创建 Xrecord 表：

命令： (setq datalist (append (list '(0 . "XRECORD")'(100 . "AcDbXrecord")) '((1 . "This is my data") (10 1. 2. 3.) (70 . 33))))

((0 . "XRECORD") (100 . "AcDbXrecord") (1 . "This is my data") (10 1.0 2.0 3.0) (70 . 33))

生成 Xrecord 对象：

命令： (setq xname (entmakex datalist))

<图元名: 1d98958>

将 Xrecord 对象添加到词典：

命令： (dictadd newdict "DATA_RECORD_1" xname)

<图元名: 1d98958>

参阅

dictnext、dictremove、dictrename、dictsearch, 和 namedobjdict 函数。