[已解决]：关于mslide在lisp中的调用问题。

Wildcat · 发表于 2007-10-8 12:29:23

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

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

×

写了一段lisp，目的是方便制作幻灯片文件，程序如下。

[FONT=courier new]
(defun c:test ()
(setvar "cmdecho" 0)
(setq name (getvar "dwgname")
name_num (strlen name)
name_num_n (- name_num 3)
name_n1 (substr name 1 name_num_n)
name_n (strcat name_n1 "sld")
)
(setvar "filedia" 0)
(command "mslide" name_n)
(setvar "filedia" 1)
(prin1)
)
[/FONT]

使用后发现问题，情况是：有时候会生成幻灯片，有时候却不会（在不同的DWG中）。
总结了一下，发现，如果在调用程序前，手动输入mslide，并生成幻灯片，则在这个DWG中，使用上面的程序均正常。如果不手动输入mslide，并执行一次，则有时候会生成幻灯片，有时候却不会（在不同的DWG中）
请问如何解决？

LUCAS · 发表于 2007-10-12 16:55:15

(defun c:test ()
  (setvar "cmdecho" 0)
  (setq name    (getvar "dwgname")
name_num (strlen name)
name_num_n (- name_num 3)
name_n1    (substr name 1 name_num_n)
;name_n    (strcat name_n1 "sld")
  )
  (setvar "filedia" 0)
  (command "mslide" name_n1)
  (setvar "filedia" 1)
  (prin1)
)

xshrimp · 发表于 2007-10-12 21:59:14

;name_n (strcat name_n1 "sld")
和这个有什么关系??

Wildcat · 发表于 2007-10-15 22:59:39

最初由 LUCAS 发布
[B](defun c:test ()
  (setvar "cmdecho" 0)
  (setq name    (getvar "dwgname")
name_num (strlen name)
name_num_n (- name_num 3)
name_n1    (substr name 1 name_num_n)
;name_n    (strcat name_n1... [/B]

按您的方法，问题依然存在，当地因为发现不加上name_n (strcat name_n1 "sld")，有时候新生成的幻灯片变成没有扩展名了（不是每次都会），所以就加上了，刚才试了删去name_n (strcat name_n1 "sld")，还是有时候会生成幻灯片，有时候不会生成。

LUCAS · 发表于 2007-10-17 07:58:41

因你mslide沒有給全路徑

Wildcat · 发表于 2007-10-17 13:16:20

一直错误认为系统自动会把当前DWG路径作为准备生成的SLD的默认路径,问题终于解决了.谢谢您.

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

[已解决] [已解决]：关于mslide在lisp中的调用问题。

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

相关帖子