LISP保存文件的时候能否象打开文件一样选择路径和指定文件明啊???

alin

(getfiled "Save" "c:" "txt" 7)

Ea

sandy2002发表于2005-7-29 22:18:00调用SAVEAS命令在编程模式下并不会出现对话框

(initdia)(vl-cmdf ".saveas")

xialiang

谁告诉你Getfiled是打开文件???再仔细看看,好好研究一下Getfiled函数的使用...

----------------------------------------------
多动脑筋
meflying@mjtd.com

请指点!!谢谢!!

meflying

getfiled仅仅是返回一个文件的文件名及路径

如：

操作：(打开 filename)

使用getfiled仅仅返回filename，至于返回后你要打开，还是要保存，是那个“打开”操作的事，跟getfiled无关

例：

(defun c:test( / filename f str)
  (setq filename (getfiled .....));这里面要什么提示自己填，只要能运行，填什么都没关系
  (setq f (open filename "r"));以只读打开文件
  (setq str (read-line f))
  (close f)
  (setq filename (getfiled ...));同前
  (setq f (open filename "w"));以写的方式打开文件
  (write-line str f)
  (close f)
)

xialiang

(getfiled "Save" "c:" "txt" 7)

我的函数HELP里没又7这个说明!

你们都是怎么知道的!

你们又更好的函数HELP吗?

能给我一份吗?