Lsp 2004-2008
我找到了一个Lisp程序来轻松创建3dtext，它在我2004年的Autocad上运行得很好，但在2008年不起作用！关于如何修复它，或者在哪里找到2008年可用的建议？谢谢
Crppiper公司
如果没有看到
代码有错误并提供更多
关于产生错误的确切原因的信息
~'J'~ 嗯，我试图在回复中插入文件，但它太大了，我试图复制/粘贴文本及其方式太多。。。
我的电子邮件是justin。ronk@jvic.com，给我发一封电子邮件，我会把它发给你和梅比，然后你可以帮我
加载并执行命令后，它在命令行中显示“错误加载”。我可以准确地将文本插入到Dwg中，也就是当我收到错误消息时。。。我的电脑上没有2008，这是另一台电脑上的。我有我的2004年，它的工作很好。。。该文件位于一般位置，我可以在网络中的任何计算机上访问它，因此它在电子邮件中不是一个问题。。。
谢谢 你可以把它们用拉链拉起来
像ZIP文件
请再试一次
这里有太多聪明的男孩把我排除在外
这可以有效地帮助你
~'J'~ 3DText。拉链
这是压缩后的文件。如果有任何帮助，我们将不胜感激
我不记得我在哪里找到这个Lisp例程。。。但他们的工作是作出承诺，我将很快搬到2008年，我需要这个惯例。。。另一方面，每次我需要3d文字包裹在坦克或船只周围时，我都会加上大约一个小时。。。。 改为尝试编辑版本
~'J'~
3DText。拉链 不，仍然不起作用。情况确实更糟。当我为新文本键入“n”时，它就会关闭，因为它返回到命令行中的“command:”。。。而不是问我下一步该做什么。。。。谢谢你的尝试。。。。 我还是不能解决这个问题
~'J'~ 在set_TrueColor函数中搜索lsp文件中的“AutoCAD.AcCmColor.16”，并将16更改为17。
显然，这取决于版本，因此您可以按如下方式更改代码行：
(setq vla_truecolor (vla-getinterfaceobject (vlax-get-acad-object) (strcat "AutoCAD.AcCmColor." (itoa (atoi (getvar "acadver"))))))
我看了fixo发布的代码，基本上和我做的一样。它应该有用！如果没有，请尝试重新打开图形，然后重试。你在点击“n”后描述的问题与fixo更改的内容无关。
脚踏板 好的，谢谢所有帮助过我的人。。。问题已经解决。。。我只把16岁改为17岁，这很管用。。。准确地说，我们正在运行机械2008，它说它是“r17.1”，所以我想我应该把它改为17.1，但现在我把它留在17。再次非常感谢你。。。我现在了解了更多关于Lisp文件的Lil。。。。
页:
[1]
2