lmc 发表于 2005-9-28 13:53:00

<P>我没搞定,</P>

yedajiang 发表于 2005-9-28 16:04:00

可以的。就是选择文件名时用的函数GETFILED不是很好,总提示是不是覆盖,作为保存时选择文件名还差不多。

meflying 发表于 2005-9-28 16:24:00

yedajiang发表于2005-9-28 16:04:00static/image/common/back.gif可以的。就是选择文件名时用的函数GETFILED不是很好,总提示是不是覆盖,作为保存时选择文件名还差不多。

<BR>请仔细查看getfiled的用法

lmc 发表于 2005-9-29 08:09:00

<P>看我的,问提在那里?</P>

ZZXXQQ 发表于 2005-9-29 08:26:00

试试:

(DEFUN C:LB ()
(SETQ NMM (IF (/= NMM nil) NMM "")
       NMM (GETFILED "Select File Name 选择库文件名" NMM "slb" 2))
(SETQ SNM (GETSTRING "Enter Slide Name 输入幻灯片名"))
(IF (AND (/= NMM "") (/= SNM ""))
(COMMAND "VSLIDE" (STRCAT NMM "(" SNM ")"))
)
(PRINC)
)

wangzhong 发表于 2005-9-29 09:19:00

<P>一般将幻灯片库建好后用菜单宏调用、如下列:</P>
<P>^C^C^P(load"wblk")(princ) wblk jxj3-blk ^P</P>

dkj0322 发表于 2010-10-11 18:33:00

<font face="Verdana">谢谢楼上的分享,参考下,很感激</font>

haiyunzhou 发表于 2012-1-12 10:28:55

又学习了 非常感谢

趣意人生 发表于 2021-1-13 22:35:52

非常感谢!
页: 1 [2]
查看完整版本: [讨论]用LISP怎样调入幻灯片图库