lsj2004 发表于 2004-3-15 22:09:00

[LISP]请大家帮忙解决一下。

我在一家设计院工作。当然要用autocad了。我们单位用的是一种专门的软件叫ＴＥＣＡＤ，它基本上全是ＬＩＳＰ语言编写的，是基于Ｒ１４的一种软件。我后来修改了一下程序，能让它在２００２里面正常运行了。但是发现只有一个程序在调用时出问题，详细情如下：


“错误：参数类型错误：FILE　nil”


那些程序存放在Ｃ盘根目录下的一个文件夹里，有个．ＭＮＳ文件（在support里面）。当我在cad里运行menu命令时，重新加载一遍．MNＳ文件或者直接关掉对话李瑞环后，再运行此程序，就行了，不知道是怎么一回事。请大家帮忙解决一下。

龙龙仔 发表于 2004-3-16 07:57:00

把ＴＥＣＡＤ傳上來看看

meflying 发表于 2004-3-16 08:18:00

直接关掉对话李瑞环后?

lsj2004 发表于 2004-3-17 21:28:00

更正！

不是李瑞环，是“关掉对话框后”！






lsj2004 发表于 2004-3-18 19:45:00

大家共同研究一下嘛！

meflying 发表于 2004-3-18 19:46:00

不好意思，你的文件我无法复制（一复制就死掉），也无法下载。。。

龙龙仔 发表于 2004-3-19 08:03:00

<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><FONT face="Times New Roman">Sorry!</FONT>你沒有提供完整程序供測試<FONT face="Times New Roman">!!!</FONT></FONT>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p><FONT face="Times New Roman" size=3>        </FONT></o:p>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><FONT face="Times New Roman">;;</FONT>當我在<FONT face="Times New Roman">cad</FONT>裏運行<FONT face="Times New Roman">menu</FONT>命令時，重新載入一遍<FONT face="Times New Roman">MN</FONT>Ｓ檔或者直接關掉對話後，</FONT>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><FONT face="Times New Roman">;;</FONT>再運行此程式，就行了。</FONT>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 18pt; TEXT-INDENT: -18pt; mso-list: l0 level1 lfo1; tab-stops: list 18.0pt"><SPAN style="mso-list: Ignore"><FONT face="Times New Roman"><FONT size=3>1.</FONT><SPAN style="FONT: 7pt 'Times New Roman'">                                       </FONT></SPAN></SPAN><FONT size=3>重新載入一遍<FONT face="Times New Roman">MN</FONT>Ｓ檔</FONT>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 18pt"><FONT size=3><FONT face="Times New Roman">&gt;</FONT>可查看相對應<FONT face="Times New Roman">mns</FONT>的<FONT face="Times New Roman">mnl</FONT>檔</FONT>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 18pt; TEXT-INDENT: -18pt; mso-list: l0 level1 lfo1; tab-stops: list 18.0pt"><SPAN style="mso-list: Ignore"><FONT face="Times New Roman"><FONT size=3>2.</FONT><SPAN style="FONT: 7pt 'Times New Roman'">                                       </FONT></SPAN></SPAN><FONT size=3>者直接關掉對話</FONT>


<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 18pt"><FONT size=3><FONT face="Times New Roman">&gt;</FONT>可能是初始值的問題<FONT face="Times New Roman">!</FONT></FONT>

zcjhy 发表于 2004-3-21 00:36:00

我将文本分段拷贝就下下来了 正在研究

ljcgq 发表于 2004-3-21 19:47:00

.ＭＮＳ在程序里找一下,看看调用的路径是否正确,如果程序里调用的路径下没有.ＭＮＳ文件它会会提示"FILE　nil"或者是程序调用的其它路径下的文件不存在,你的程序我下栽不下来,

lsj2004 发表于 2004-3-23 20:44:00

不过，大家可以帮我想一下，在lisp里面直接加一个小程序，先让它运行menu命令，加载一下.MNS菜单。我试过几次可就是不行，大家可以帮忙试一下。
页: [1] 2
查看完整版本: [LISP]请大家帮忙解决一下。