Lisp在Acad 200中不起作用

The Buzzard · 发表于 2022-7-6 14:30:45

有人对lisp例程有问题吗？该例程将在早期Cad版本中工作，但不会在以后的版本中工作。我有一个lisp在2004年可以用，但在2009年不行。如果有人经历过这种情况，你能告诉我它是否已经解决，以及采取了什么措施来解决它吗。

谢谢
秃鹰

wizman · 发表于 2022-7-6 14:36:38

可能是InitCommandVersion：

http://blog.jtbworld.com/2009/03/initcommandversion-and-r-control.html

The Buzzard · 发表于 2022-7-6 14:38:13

感谢WIZ提供的信息，但这并没有做到。

我在2004年运行IDS程序，一切正常。
当我在2009年运行同一个程序时，我收到以下消息。
我很困惑，因为它以前确实有效。

Command: COMMANDLINE
Command: IDS
Select insertion point:
"1-42x2.25-90-L-E-O-WA.dwg": Can't find file in search path:
 C:\Documents and Settings\abozzone.maxus\My Documents\ (current directory)
 C:\Documents and Settings\abozzone.maxus\Application Data\Autodesk\AutoCAD 
2009\R17.2\enu\support\
 C:\Program Files\AutoCAD 2009\support\
 C:\Program Files\AutoCAD 2009\fonts\
 C:\Program Files\AutoCAD 2009\help\
 C:\Program Files\AutoCAD 2009\express\
 C:\Program Files\AutoCAD 2009\support\color\
 C:\TDS\Lsp\
 C:\TDS\
 C:\TEMP\
 C:\TDS\Slides\
 C:\TDS\Help\
 C:\Program Files\Adobe\Acrobat 6.0\Acrobat\
 C:\Documents and Settings\abozzone.maxus\Desktop\
 C:\CPM\
 C:\IDS\
 C:\TDS\SL\
 C:\Program Files\AutoCAD 2009\drv\
 C:\Program Files\AutoCAD 2009\
*Invalid*
; error: Function cancelled

The Buzzard · 发表于 2022-7-6 14:41:56

出于好奇，下面的链接是有问题的程序。

http://www.cadtutor.net/forum/showthread.php?t=34891

试着运行这个程序，看看你的想法。

wizman · 发表于 2022-7-6 14:45:22

在acad 2009中，您的支持目录中只缺少块的路径。我在2008年和2009年尝试了一个虚拟块，好看的界面。

The Buzzard · 发表于 2022-7-6 14:49:16

我不明白你的意思。我的支持目录在那里，一定还有别的。这些块是在程序中创建的。如果你测试了这个程序，你就会明白我的意思。

Lee Mac · 发表于 2022-7-6 14:51:22

这一切在04年对我来说都很好（正如你预测的那样）。。。

当你在09年运行它时，会出现对话框吗？有那么远吗？

我注意到一件事：
在代码中输入块定义时会遇到很多麻烦，但随后使用命令调用插入它们-这可能是导致错误的原因-因为块只出现在图形中，而不出现在ACAD搜索路径中-因此09年可能会执行“findfile”搜索，而不会找到任何同名的内容。

为什么不做积木呢？而不是插入它们？

此外，我没有机会完全分解代码，在创建定义之前，我没有在表中看到任何关于块存在性的测试，或者你只是在每次选择块时输入定义？因为这可能会导致程序运行缓慢，因为它每次都必须重新定义块。

只有我的0.02美元

李