为了加载和说独立名称空间的.vlx 中的对话框,你必须将在 OpenDCL 运行时定义的变量输入到你的应用程序的名称空间。 OpenDCL 为每个控件和窗体创建一个全局的指针或变量。这些变量在对话框关闭时立即被消毁。当 OpenDCL 在文档名称空间中创建它的全局变量时,你必须使用 vl-doc-ref 函数将该值输入到你的应用程序名称空间中。
简单的示例如下。
; 调用函数来确认合适的 OpenDCL.arx 文件加载 (or LoadRunTime (load "_OpenDclUtils.lsp") (exit)) (LoadRunTime)
; 输入 OpenDCL ObjectARX 函数到独立名称空间 (vl-arx-import "OpenDCL.17.arx") ; 或可能是 OpenDCL.16.arx 版本
(defun c:vlx () (dcl_Project_Load "Test" T) (dcl_Form_Show Test_Form1) ); end defun
(defun c:Test_TextButton1_OnClicked () (dcl_Control_SetCaption (vl-doc-ref 'Test_Form1_Label2) "独立名称空间函数") );end defun
注意符号名称做为上面 vl-doc-ref 函数的一部分被引用。每一窗体或控件名称必须通过使用 vl-doc-ref 函数来访问。
|