[讨论]用LISP怎样调入幻灯片图库

lmc

我没搞定,

yedajiang

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

meflying

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

请仔细查看getfiled的用法

lmc

看我的,问提在那里?

ZZXXQQ

试试：

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

复制代码

wangzhong

一般将幻灯片库建好后用菜单宏调用、如下列：

[wzwd(jxj3)]^C^C^P(load"wblk")(princ) wblk jxj3-blk ^P

dkj0322

谢谢楼上的分享，参考下，很感激

haiyunzhou

又学习了 非常感谢

趣意人生

非常感谢！