[试用]：机械零件标注，jxhaha请进

liusz11

最初由 jxhaha 发布
[B]“middle”是什么东东？ [/B]

middle是文字的对齐方式呀！jxhaha不可能不知道这吧？！
to：柔柔
才把程序试用了一下，非常好，比我自己编的好多了。在此提点意见，仅供参考：
1. 当要用户提供“指示标注位置”时最好能将捕捉打开，以便用户对齐标注，待给定标注位置后再将捕捉关掉。
2. 程序中字高等参数是通过dimscale变量来决定的吧，这样如果dimscale为0时程序就会出错，当然dimscale一般情况下不会为零，但不能排除这种意外。我有一次在别人的图上演示我的序号程序（也是通过对dimscale变量来决定相关数据的）时，结果出错，一查之下发现dimscale为0。
3. 是否能用donut来代替小方点（不过我倒觉得关系不大）。
一点拙见，不当之处尚讫见谅。

jxhaha

middle是语言函数？哪俺怎么懂呢：（
第1个建议不错
dimscale为0提示为“除数为零”，只要改提示为“比例因子不能为0”就可以了
再次向高高手柔柔表示敬意并真诚地哈一声：柔柔同志辛苦了！
还要真诚地感谢斑竹能容忍这个主题不移出本板块——谢谢斑竹！

柔柔

最初由 liusz11 发布
[B]
1. 当要用户提供“指示标注位置”时最好能将捕捉打开，以便用户对齐标注，待给定标注位置后再将捕捉关掉。
2. 程序中字高等参数是通过dimscale变量来决定的吧，这样如果dimscale为0时程序就会出错
[/B]

3个建议很好，我把它修改过来，第2个建议中提到的问题是我疏忽了，以前都是这样写的：
  (if (= dwg_scl nil) (setq dwg_scl (getvar "dimscale"))) ;
  (if (= (getvar "dimscale") 0) (setq dwg_scl 1))

那个方点我是想既要考虑删除方便（不留一个小点，用Pline线让它们成为一个对象）又偷懒了一点，下次一并修改。
非常感谢！

有一个问题你们没有注意：
垂直标注的横线长我设置成用第一个标号的字符数决定的，这样有：
1。输入2,345,6 和输入345,2,6会不一样。
2。追加标注时与原标注会不一致。

jxhaha

俺怎么忘了这帖啊～～

xjxing

能否将原程序再贴出来？很感兴趣！

marcol

就是啊，帖出来我们也享受一下啦~~~