求教：如何在R14版的lisp中编写一个lisp程序通过对话框选择得到一个目录？

ykung · 发表于 2003-6-7 15:18:00

r14中用lisp编程，如何写一个程序，通过windows标准文件对话框让
用户选择一个目录名字并返回呢？

spring · 发表于 2003-6-7 19:41:00

ykung · 发表于 2003-6-8 13:03:00

我知道getfiled，但是它是返回一个文件名字，必须要选到文件，我现在只是想选定一个目录。getfiled有参数可以设成选目录吗？

spring · 发表于 2003-6-8 21:10:00

;;;下面的程序是先搜索acad2000doc.lsp所在的目录
;;;然后再用getfiled打开该目录的*.lsp文件
(defun c:fi ()
  (setq fid (findfile "acad2000doc.lsp"))
  (setq fd (strlen fid))
  (setq fl (substr fid 1 (- fd 15)))
  (setq hfile (getfiled "spring" fl "lsp" 8))
)

mccad · 发表于 2003-6-8 21:23:00

ykung · 发表于 2003-11-24 21:49:00

谢谢，我去试一下

xiateng · 发表于 2004-1-5 10:32:00

想要一个lsp程序加密及对应解密的程序

呆呆 · 发表于 2004-1-6 08:21:00

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=14640

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

求教：如何在R14版的lisp中编写一个lisp程序通过对话框选择得到一个目录？

getfiled

不是的

試試看下面的程序對你有沒有幫助

将最后一位设为16则只取目录名称