关于插入带属性的块
之前有一个LSP程序,是插入带属性的块的程序,但是在2014上无法使用了,找了很久,没有找到合适的解决方法,有大神帮忙改一下,插入的属性比如说是时间属性一类的,能自动根据当前的时间插入。原来的程序如下(defun c:xgtq( / cdd f n n1 pt r s y);
(setq cdd (getvar "CDATE"))
(setq cdd (rtos cdd 2 4))
(setq n (substr cdd 1 4))
(setq y (substr cdd 5 2))
(setq r (substr cdd 7 2))
(setq s (substr cdd 10 2))
(setq f (substr cdd 12 2))
(setq pt (getpoint "输入插入点:"))
(if (= pt nil) (setq pt '(0 0 0)) )
(setq n1 (* 1 plot_scale))
(command "INSERT" "blk/tuchuo.dwg" pt n1 n1 "" s n f y r "给排水" "" "")
)
应该是这些系统变量影响的,试一试吧:
attdia 控制 insert 命令是否使用对话框用于属性值的输入:0.给出命令行提示 1.使用对话框
attmode 控制属性的显示:0 关,使所有属性不可见;1.普通,保持每个属性当前的可见性;2.开,使全部属性可见
attreq 确定 insert 命令在插入块时默认属性设置。0.所有属性均采用各自的默认值;1.使用对话框获取属性值 plot_scale 这个变量没赋值 start4444 发表于 2019-7-16 18:19
plot_scale 这个变量没赋值
这个在别的程序里面有赋值,是出图比例的一个值,比如100,但是还是不行啊,插入不进去。 我想着先带属性插入进去,比如带有6个属性,在直接把这六个属性提取出来替换掉,但是不会 lsp应该是通用的,你手动看看14版插入属性块的命令是不是操作有改变了导致不行 命令: (command "INSERT"
(_> )
INSERT 输入块名或 [?]: nil
输入块名或 [?]: A1
忽略块 _ArchTick 的重复定义。
正在用 [@_1hz.shx] 替换 。
单位: 无单位 转换: 1
指定插入点或 [基点(B)/比例(S)/X/Y/Z/旋转(R)]:
输入 X 比例因子,指定对角点,或 [角点(C)/XYZ(XYZ)] <1>: 1
输入 Y 比例因子或 <使用 X 比例因子>: 1
指定旋转角度 <0>: 0
输入角度就直接结束了。 abcxyz0517 发表于 2019-7-17 11:20
命令: (command "INSERT"
(_> )
INSERT 输入块名或 [?]: nil
你好,我也遇到插入属性块传递属性除了问题,请问你后来解决了吗? 怎样插入有属性的块
页:
[1]