[分享]：表格绘制，自由对齐命令，规划词典，甲级规划院

小昕 · 发表于 2005-8-9 12:32:06

感觉好复杂，好用吗？使用率搞吗

ziru135543 · 发表于 2005-8-10 11:48:48

下来了
会用了谢谢楼主

macro · 发表于 2005-8-12 15:10:24

规划词典不错,不明白时可以查查.

westlake0 · 发表于 2005-8-12 16:04:56

好久没来了

lovebaby · 发表于 2005-8-13 17:21:01

直接使用CAD2006就不用这个软件了

nwg0939 · 发表于 2005-8-24 18:49:27

不错

ygh337 · 发表于 2005-9-4 09:57:25

好多的好东西啊

jsq · 发表于 2005-9-4 10:54:45

表格命令好用,对齐只能是一个方向.

shuaier · 发表于 2005-10-5 19:06:59

单个沿某一方向对齐，我建议大家用AL命令，我上传的那个只能对多个实体进行进行左，右，中对齐！

黯夜の记忆 · 发表于 2005-10-23 02:02:01

对齐的命令有BUG，会少掉一些线

子曰无为 · 发表于 2005-10-27 17:28:45

很不错 ,以前没用过,加的工具也满好的.不知道词典什么时候有期待中

yeqi · 发表于 2006-2-23 11:03:56

好冬冬，收藏啦
谢谢楼主哦

lrl2006 · 发表于 2006-11-7 20:10:52

(DEFUN C:TEXTIN () (SETQ PT_BASE (GETPOINT "\nSelect test start point : ")
TEXT_A (GETSTRING "\nInput the abbreviate text : "))
(SETQ FILE_ID (OPEN "C:\\TEXTIN.TXT" "r") CHECK 0 TEXT_O "")
(SETQ TEXT_T (READ-LINE FILE_ID))
(WHILE (AND (/= TEXT_T NIL) (= CHECK 0))
(IF (= TEXT_T TEXT_A)
(SETQ TEXT_O (READ-LINE FILE_ID) CHECK 1)
(READ-LINE FILE_ID)
) ;关闭IF
(SETQ TEXT_T (READ-LINE FILE_ID))
) ;关闭WHILE
(COND ((= TEXT_A "W")
(SETQ TEXT_O (STRCAT
(GETSTRING "\nInput weld side : ") TEXT_O)))
((= TEXT_A "SW")
(SETQ TEXT_0 (STRCAT "M"
(GETSTRING "\nInput screw diameter : ") "x"
(GETSTRING "\nInput screw length : ") TEXT_O)))
) ;关闭COND
(IF (= TEXT_O "") (SETQ TEXT_O TEXT_A))
(COMMAND "TEXT" PT_BASE "" TEXT_O)
(PRINC)) ;关闭DEFUN

46311444 · 发表于 2006-11-9 09:28:58

谢谢，又学了一着

加菲 · 发表于 2006-11-13 09:24:24

很有用的小东西谢谢楼主！

账号		自动登录	找回密码
密码			立即注册