明经通道 Visual LISP 函数	明经通道 Visual LISP 函数
vl-arx-import

将 ObjectARX/ADSRX 函数输入到独立名称空间 VLX

(vl-arx-import [’function | "application"])

缺省情况下，独立名称空间 VLX 应用程序不从 ObjectARX/ADSRX 应用程序输入任何函数。使用 vl-arx-import 可以从 ObjectARX/ADSRX 应用程序中显式输入函数。

参数

function

符号，命名要输入的函数。

application

字符串，命名函数要输入到的应用程序。

如果没有指定参数（或参数为 nil），vl-arx-import 从当前的文档名称空间输入所有函数名称。

返回值

未确定。

如果从文档 VLX 执行，则该函数不做任何操作并返回 nil，而所有 ADS-DEFUN 函数名将自动输入到文档 VLX 应用程序中。

示例

执行以下操作，观察 vl-arx-import 如何工作：

1. 将下列代码复制到 VLISP 编辑器，并保存文件：

(vl-doc-export 'testarx)

(defun testarx ()

   (princ "This function tests an ObjectARX application ")

   (vl-arx-import 'c:cal)

   (c:cal)

)

2. 使用“生成应用程序”将该代码编译为 VLX。选择“独立名称空间应用程序”选项。
3. 加载 geomcal.arx（如果尚未加载）。
4. 加载并运行应用程序。

要验证 vl-arx-import 的效果，可以注释掉代码中的 vl-arx-import 调用，保存修改，然后在此生成并运行应用程序。没有了 vl-arx-import 调用，将找不到 c:cal 函数。

在上面的样例中，可以用下列代码取代 vl-arx-import 调用：

(vl-arx-import "geomcal.arx")

这样将输入 geomcal.arx 中定义的所有函数，包括 c:cal 在内。