请进来看看能不能实现这功能!

coolpoom

2. defun c:tt()
3. (command "dxfin""f:\\out\\aa.dxf"))
4. 中的文件名"aa"能不能改成用户输入?
5. 输入命令后等用户输入名称如"bb"就插入f:\\out\\bb.dxf

defun c:tt() (command "dxfin""f:\\out\\aa.dxf")) 中的文件名"aa"能不能改成用户输入? 输入命令后等用户输入名称如"bb"就插入f:\\out\\bb.dxf

quanguang

我没有调试，看看行不

(defun c:tt()
(setq wjm (getstring "输入文件名"))
(setq wj (strcat "f:\\out\\" wjm ".dxf"))
(command  "dxfin" wj)
  )

ZZXXQQ

(defun c:tt ()
 (setq nm (if nm nm ""))
 (if (setq nm (getfiled "选择文件" nm "dxf" 2))
  (command "dxfin" nm)
 )
 (princ)
)

coolpoom

感谢quanguang感谢ZZXXQQ