[求助]"此对象不能定义坐标系",是为什么？

lei6699 · 发表于 2004-3-31 15:02:00

我的程序里面，有一段是下面的，刚打开CAD一定是可以运行的，可是第二遍的时候，却总是说“此对象不能定义坐标系”，我用LINE画好了，再用（entlast）保存，有问题吗？

龙龙仔 · 发表于 2004-3-31 16:53:00

你可先檢查看看(ENTLAST)是甚麼?
程序不全貼上,能解決問題嗎?

lei6699 · 发表于 2004-3-31 18:19:00

(command "_.pline" pt1 "w" 0 0 pt2 "")
然后(entlast)不就是画的pline吗？
而且第一遍可以，第二遍就不行了。。。

meflying · 发表于 2004-3-31 18:48:00

问题是你的(command "_.pline" ...)画出了pline了吗？没有完整的程序，无法知道这些参数是否有问题（稍微看了一下程序，你跟踪一下listfor，看是否正确）
另， (setq ss1 (entlast))
(command "ucs" "n" "ob" (entlast))
这里的command为什么不直接使用已经保存的ss1，还有在使用一次(entlast)?

lei6699 · 发表于 2004-3-31 20:18:00

后面还用(entlast)，是因为我在实验，不知道用（entlast）后，还需不需要打回车“”
刚才试了一下，画了2次，第三次的时候不行了。。。除非建立一个新的图形。。
fread.lsp程序

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:eaezrqzy4pz.lsp
下载次数:0 文件大小:8.11 KB 售价:2银币 [记录]
下载权限: 不限以上或 Vip会员 [开通Vip] [签到领银币] [免费赚银币]

读取的数据文件：

lei6699 · 发表于 2004-3-31 20:33:00

请斑竹跟各位大虾们一定要帮忙看看，我的头都晕了~~谢谢~~

meflying · 发表于 2004-3-31 20:52:00

让你查一下出错的那个(entlast)是什么，你就是不查。。。总觉得它是条PLINE，由于OSNAP的关系，他已经成一个点了，所以建立坐标系出错了。。。使用此程序时要将捕捉关掉。。。另，对于那两行红字的问题，你说的理由似乎跟我说的问题没有关系吧，跟要不要回车有什么关系？既然已经将(entlast)赋给ss1了，那ss1就完全可以代替(entlast)了，还要用一次(entlast)做什么？将程序里if那句改为如下，你自己看看这个问题是怎么回事吧：
(setq ss1 (entlast))
(if ss1
(command "ucs" "n" "ob" ss1)
);（觉得这里的if好象根本没有必要，如果为nil，那表示图中没有任何对象了，那你的整个程序就已经瘫痪了）