求助：如何自动标准pline线各顶点坐标值！（重复发贴）

51082481

程序可以完全运行，非常合适，就一个小小问题，不知道是不是我的系统设置的问题。谢谢！我会不断学习！

meflying

这是你的属性块的问题，你可以调整一下你原来的属性块几可以了，原来的程序是运行18个数据的测试版本，现在已经改成任意数据的（数据的位置要在第二列和第三列，且从第三行开始不能变），请重新复制加载。

51082481

meflying发表于2004-12-2 12:59:00这是你的属性块的问题，你可以调整一下你原来的属性块几可以了，原来的程序是运行18个数据的测试版本，现在已经改成任意数据的（数据的位置要在第二列和第三列，...

我正想问这个“能否运行任意多行数据”的问题了，明白了。属性块问题已经解决了。

51082481

程序是标注（x、y）两个坐标，但如果我只标注其中一个x或y值，请问怎么修改！


还有我又发现一个小问题：


当我把数据excel文档和lsp程序、属性点和要操作的dwg文件放在同一目录下，就会出现下面的错误：


       

51082481

如果我把excel文档放在别的目录就可以完全运行。

51082481

如何把这个程序放到cad菜单里，这样方便不用每次打开cad都要加载？

51082481

刚才那个“（x，y）标注其中之一的值”的问题我已经解决了，是不是这样： (command "_.insert" "属性点二" e "" "" "" (strcat (rtos (car e) 2 3) " , " (rtos (cadr e) 2 2))) (command "_.insert" "属性点二" e "" "" "" (strcat （rtos (cadr e) 2 2)))

meflying

找到这句，(strcat (rtos (car e) 2 3) " , " (rtos (cadr e) 2 2)))


改为:


(rtos (car e) 2 3) ;标注x


(rtos (cadr e) 2 3) ;标注y


至于怎么自动加载，你可以使用appload命令的启动组，还有一些别的方法，你可以搜索一下论坛，以前有讨论过的


另外一个问题（就是数据文件的位置问题）试试这样改：


(getfiled "打开存放数据的Excel电子表格文档" "e:\\" "XLS" 8)


该为：


(getfiled "打开存放数据的Excel电子表格文档" "e:\\" "XLS" 0)