查看单个帖子
旧 2009-04-26, 02:08 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 [求助]求助高手,谁能把这个属性块z轴归0?

[求助]求助高手,谁能把这个属性块z轴归0?
www.dimcax.com
[求助]求助高手,谁能把这个属性块z轴归0?[求助]求助高手,谁能把这个属性块z轴归0?
请使用winrar软件打开rar压缩文件。
d
(setq pt (vlax-get (vlax-ename->vla-object (car (nentsel "直接选文字"))) 'insertionpoint))
(vlax-put-property txt 'insertionpoint (vlax-3d-point (list (car pt)(cadr pt))))
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.
nonsmall老大,得出的是此图块文字的坐标呀-112.727 2062.41 1388.2),我是想怎样把里面的字移到z轴为0。
d
没错 我知道你是想移动文字z值归0
你转换视角后使用上面的两行看看达到的效果(不要炸开看)
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.
;re:如何将两线变成同一平面 ... 发言人: jegy
d
[求助]转换了视角还是一样呀。使用了:
(setq pt (vlax-get (vlax-ename->vla-object (car (nentsel "直接选文字"))) 'insertionpoint))
(vlax-put-property txt 'insertionpoint (vlax-3d-point (list (car pt)(cadr pt))))
转换了视角进行气操作还是一样呀。
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)