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

xialiang · 发表于 2005-7-28 20:56:00

LISP保存文件的时候只能让编程人员指定路径吗?

能否象打开文件一样出现"对话框"让使用者选择路径和指定文件名能???

请高手指点!!!!

yxp · 发表于 2005-7-28 21:41:00

(getfiled "保存文件" "要保存的内容" "txt" 1)

xialiang · 发表于 2005-7-28 22:01:00

可是getfiled是打开已有的文件啊！

我这个文件是生成的！！

yxp · 发表于 2005-7-28 22:24:00

可以的，你再试试，不行就把代码传上来。

xialiang · 发表于 2005-7-28 23:11:00

我再Q上加你！你怎么不上线啊！！！我就是想存文件！GETFILED不是打开已有的文件吗！！！？？

我那还没有文件呢！正准备生成呢！

xialiang · 发表于 2005-7-29 08:46:00

(defun wf( / pp aa bp deci xx yy d1 k)
    (setq pp (getstring"\n input the name of file"))
    (setq aa (open pp "w"))
    (setq deci (getint "\n保留小数位数"))
    (setq deci (if deci deci 3))
    (setq bp (getPOINT"\NpLEASE SELECT POINT TO WRITE OUT!"))
    (SETQ K 1)
    (WHILE BP
(setq XX (CAR BP))
         (SETQ YY (CADR BP))
(setq d1 (strcat (ITOA K) "," (RTOS XX 2 deci) "," (RTOS YY 2 deci)))
(write-line d1 aa)
         (setq bp (getPOINT"\NpLEASE SELECT POINT TO WRITE OUT!"))
         (SETQ K (1+ K))
    )
    (close aa)
)

；文件aa的路径能象GETFILED选择文件那样对话框指定路径SAVE吗？

meflying · 发表于 2005-7-29 09:17:00

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

Ea · 发表于 2005-7-29 12:42:00

saveas

meflying · 发表于 2005-7-29 13:43:00

Ea发表于2005-7-29 12:42:00saveas

如何使用？

sandy2002 · 发表于 2005-7-29 22:18:00

Ea发表于2005-7-29 12:42:00saveas

调用SAVEAS命令在编程模式下并不会出现对话框

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