请教高手

gslee · 发表于 2004-10-9 16:25:00

请问，程序中两次调用getfiled函数，第一次读，第二次写，如何能保证第二次调用时默认的路径始终是第一次调用时所选取的路径？谢谢！

meflying · 发表于 2004-10-9 16:29:00

(setq path (getfiled .......));第一次
...
(setq filename (getfiled "save" path ......));第二次

gslee · 发表于 2004-10-10 16:10:00

谢谢！如果，单步执行可以，但在以下调用中就出错，请指教。谢谢！    (action_tile "filein" "(getf)")
   (action_tile "fileout" "(outf)")
(defun getf ( /    strFile)
   (setq strFile (getfiled "请选择转点文件" "" "" 0))
   (set_tile "fi" strFile)
) (defun outf ( / strFile)
   (setq strFile (getfiled "请输入成果文件"    ""    "" 1))
   (set_tile "fi2" strFile)
)
请注意：我已经将2楼的办法试了，单步执行可以，但在上述的程序中，改来改去怎么也不行，该怎么改，谢谢！