;;双击选择的类型按钮,进入相应的对话框程序或lisp程序 (defun c:tdycadjcd00_tdycadjcdForm00_PicB01_OnDblClicked (/) (dcl_Form_Close tdycadjcd00_tdycadjcdForm00) ;;退出对话框 (dcl_project_unload "tdycadjcd00") ;;关闭对话框文件 ;;(LoadODCLProj "T:/tdycad/tdycadjcd/jcd01/tdycadjcd01.odcl") ;;加载对话框dcl文件----能够正常运行 ;;(dcl_FORM_SHOW tdycadjcd01_tdycadjcdForm01) ;;显示对话框---能够正常运行 (Load "T:/tdycad/tdyhd/hdduanmian/dm_gong/dmgongodcl.lsp") ;;加载对话框dcl文件 (c:dmgongodcl) ;;显示对话框 ) --------------------------------- 当加载lsp程序时不能调入和运行。 我没有查到在事件程序中调用lsp文件的例子 |