[LISP程序]：一个很好的关于放大缩小的小程序

boytyj · 发表于 2004-5-2 10:53:32

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

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

×

本人第一次来，还请过关照．
（defun c:1（）（command "_（zoom）" "1.4x"））
（defun c:1（）（command "_（zoom）" ".７x"））
上面的这两行在Ｒ１４里面加载可以很方便的实现图面的放大缩小．只需按１和enter（２和enter），大家不妨试试．但现在有个问题，我在２００４版的搞了好几次都不行，还请高人指点一下，不胜感激！

081ddd · 发表于 2004-5-2 11:31:27

太一般了

丹佛 · 发表于 2004-5-2 11:39:42

这样写试试：
(defun c:1() (command "_.zoom" "s" "1.4x" ) (prin1))
(defun c:2() (command "_.zoom" "s" ".7x") (prin1))

boytyj · 发表于 2004-5-3 10:33:48

3楼这位大哥真是谢谢了,我刚才试了一下,完全没问题!

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

[LISP程序]：一个很好的关于放大缩小的小程序

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

相关帖子

浏览过的版块