标注文字背景填充

pzweng · 发表于 2012-3-8 10:10:51

经常标尺寸的时候尺寸后面有线，打印出来后数字容易搞错，需在给标注加背景填充，现求一lisp，要求：输入一个命令后要求选择标注，让文字填充颜色为背景，然后使其排序为最上面
如图:

没有填充

填充+排序后的效果

snddd2000 · 发表于 2012-3-8 10:35:03

DIMTFILL设置为1后,再标注的尺寸即为背景颜色填充

pzweng · 发表于 2012-3-8 10:45:20

snddd2000 发表于 2012-3-8 10:35
DIMTFILL设置为1后,再标注的尺寸即为背景颜色填充

不是这样的，我只是需要一些尺寸带背景填充。不是全部的

snddd2000 · 发表于 2012-3-8 11:02:55

pzweng 发表于 2012-3-8 10:45
不是这样的，我只是需要一些尺寸带背景填充。不是全部的

那就用object.TextFill,dxf里我没找到这方面的组码.

pzweng · 发表于 2012-3-8 11:04:15

snddd2000 发表于 2012-3-8 11:02
那就用object.TextFill,dxf里我没找到这方面的组码.

lisp不能实现?杯具啊

snddd2000 · 发表于 2012-3-8 11:12:07

pzweng 发表于 2012-3-8 11:04
lisp不能实现?杯具啊

能实现,用vlisp

pzweng · 发表于 2012-3-8 11:53:01

snddd2000 发表于 2012-3-8 11:12
能实现,用vlisp

能否帮帮我

snddd2000 · 发表于 2012-3-8 14:02:34

(setq ent1 (vlax-ename->vla-object (car (entsel))))
(vla-put-textfill ent1 :vlax-true)

pzweng · 发表于 2012-3-8 14:08:34

snddd2000 发表于 2012-3-8 14:02
(setq ent1 (vlax-ename->vla-object (car (entsel))))
(vla-put-textfill ent1 :vlax-true)

能否帮我做个完整点的lsp

snddd2000 · 发表于 2012-3-8 14:14:10

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