[求助]：cad中如何重复调用自编的lisp程序？

formoon · 发表于 2005-11-19 15:59:25

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

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

×

谢谢！已经自编了一些lisp程序，想在别的程序重复调用，但又希望保证这个程序的完整性，不想把它再copy然后修改为函数供别的命令使用，所以最好的办法是command命令，但发现command命令竟然不能用，不知道各位大侠是怎么处理这个问题的？

Underway · 发表于 2005-11-19 16:33:19

.
.
.
(C:yourFun) ; Load 后方可调用
.
.
.

zw_zwzx · 发表于 2005-11-24 08:02:06

你可以把你编写的lisp程序变成子函数，比如
(defun sub_kl()
........
)
之类的，之后在你的主函数中调用就可以了，command是无法调用自定义函数的，它只能调用CAD标准命令。但你的子函数和主函数最好放在一个文件里，不然可能出错，可能找不到要调用的子函数。

cjs96001 · 发表于 2005-11-29 15:39:26

用vlax-add-cmd把调用程序的命令添加到内置命令集中再用command 调用

xyz518mm · 发表于 2005-11-30 08:21:56

最初由 cjs96001 发布
[B]用vlax-add-cmd把调用程序的命令添加到内置命令集中再用command 调用 [/B]

请问可以提供一个范例吗
谢谢

XGNGG · 发表于 2005-11-30 09:55:51

厉害

Underway · 发表于 2005-11-30 10:58:09

(defun ZS (/  ptMin ptMax App)
(setq ptMin (getvar "LIMMIN")
      ptMax (getvar "LIMMAX")
)
(setvar "CMDECHO" 0)
(setq app (vlax-get-acad-object))
(vla-ZoomWindow
   app
   (vlax-3d-point ptMin)
   (vlax-3d-point ptMax)
)
(vla-ZoomScaled app 0.98 acZoomScaledRelative)
(princ)
)

(vl-load-com)
(vlax-add-cmd "ZS" 'zs nil 1)

info:
Subject: Re: vlax-add-cmd
From: Tony Tanzillo <tony.tanzillo@worldnet.att.net>

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

[求助] [求助]：cad中如何重复调用自编的lisp程序？

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

相关帖子