请教：为什么所有文字都跑到图纸左下角去了？？

zzcad · 发表于 2003-5-5 23:44:00

有一件恼人的事，我们的结构计算软件版本非常古老，而且始终未出升级版，它生成的DWG文件好象是R10的，用R12可打开文件且显示正常，但是一编辑里面的文字（包括数字），被编辑过的文字立即就跑到图纸的左下角，每一次修改都要用很多MOVE，真是烦死人了。如果用R14打开文件，干脆所有的文字都集中到图纸的左下角，辩不清其原来的位置。我用过一些DWG格式转换都无济于事，把文件在R12下转换成DXF文件再从R14里生成DWG还是老样子。请各位高手出招救救我吧，在下先谢谢啦！！

zzcad · 发表于 2003-5-7 14:32:00

请点击此处下载

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

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

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

meflying · 发表于 2003-5-8 13:42:00

希望找一个打开后正常的CAD版本，运行以下程序。希望可以运行
(defun c:Remove(/ ss n i sname sinf)
  (setq ss (ssget "X" '((0 . "text"))))
  (setq n (sslength ss))
  (setq i 0)
  (while (< i n)
(setq sname (ssname ss i))
(setq sinf (entget sname))
(setq sinf (subst '(72 . 0) (assoc 72 sinf) sinf))
(entmod sinf)
(entupd sname)
(setq i (1+ i))
  )
)
我用的是AUTOCAD2000，打开后大部分文本都正确，运行程序后修改文字不会跑到左下角。不过还有一部分文字在左下角