coolpoom 发表于 2009-1-8 22:15:00

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

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

quanguang 发表于 2009-1-8 22:24:00

<p><font face="宋体">我没有调试，看看行不</font></p><p><font face="宋体">(defun c:tt()<br/>(setq wjm (getstring "输入文件名"))<br/>(setq wj (strcat "f:\\out\\" wjm ".dxf"))<br/>(command&nbsp; "dxfin" wj)<br/>&nbsp; )<br/></font></p>

ZZXXQQ 发表于 2009-1-8 23:14:00

<p>(defun c:tt ()<br/>&nbsp;(setq&nbsp;nm (if&nbsp;nm&nbsp;nm ""))<br/>&nbsp;(if (setq nm (getfiled "选择文件" nm "dxf" 2))<br/>&nbsp; (command "dxfin" nm)<br/>&nbsp;)<br/>&nbsp;(princ)<br/>)</p>

coolpoom 发表于 2009-1-9 08:54:00

<p>感谢<strong><font face="Verdana" color="#61b713">quanguang感谢<font color="#da2549">ZZXXQQ</font></font></strong></p>
页: [1]
查看完整版本: 请进来看看能不能实现这功能!