[求助]：初学请教,一个简单的问题

liushuangxi · 发表于 2006-5-10 11:16:28

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

小弟在cad中想用菜单加载下面的程序  但是会出现错误如下:
命令:  ; 错误: no Function definition: XINJIAN

小弟在做毕业设计多多指教,谢谢了

***menugroup=mylisp

***pop4
[新建]
[新建]^C^C^P(if (not xinjian)(load "xinjian"))(xinjian)

;xinjian.LSP

(defun C:xinjian ()
(setq dcl_id(load_dialog "zwdraw.dcl"))
(if(not(new_dialog "dcl_zwdraw" dcl_id)) (exit))

  ;处理函数


  ;(action_tile "accept" "(draw)")
  (action_tile "cancel" "(done_dialog)")

  (start_dialog)
  (unload_dialog dcl_id)
  (princ)
)

zxq0220 · 发表于 2006-5-10 14:06:17

将(xinjian)改成xinjian。

liushuangxi · 发表于 2006-5-11 08:37:12

解决了
谢谢

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：初学请教,一个简单的问题

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子