胡说 发表于 2005-2-26 20:23:00

请教：如何进行自动编号

我想在要画桩位布置图，如何对桩号进行自动编号？不然，一个一个的改十分麻烦，而且容易出错。

tanyong1 发表于 2005-2-27 11:56:00

好像不能吧

席恩蒂 发表于 2005-2-27 13:23:00

那得编个程序！

胡说 发表于 2005-2-27 21:38:00

如果网上没有，等有时间我就自己编一个程序。

CADghost 发表于 2005-2-28 08:04:00

说说看,没准有高手可以帮帮你呢?你就不用抽时间了,

lilixing24 发表于 2005-2-28 13:33:00

楼主说的是墙体的编号吗？


天正里面有。。。

wudongwei 发表于 2005-3-3 01:49:00

楼主提出的问题很有趣，我为您编个程序如下，供你参考。


(defun c:biaohao ( / )<BR>       (setq h (getreal "\n 请输入标号字体的高度h:"))<BR>       (setq bili (getreal "\n 请输入图纸的比例b:"))<BR>       (setq h1 (* h bili))<BR>       (setq n (getint "\n 请输入标号的最大值n:"))<BR>       (setq i 1)<BR>       (while (&lt; i n)<BR>                       (setq pt (getpoint "\n 请输入标号的位置pt："))<BR>                       (command "text" "m" pt h1 0 (rtos i 2 0))<BR>                       (setq i (+ i 1))<BR>       )<BR>)
页: [1]
查看完整版本: 请教：如何进行自动编号