sym123321 发表于 2008-11-13 21:44:00

[求助]用AddDimOrdinate方法创建坐标标注,要求原点随UCS的原点,如何实现?

如题
我用AddDimOrdinate方法创建坐标标注,不管我怎么改UCS的原点,标注的坐标尺寸都是绝对坐标值,
用TranslateCoordinates方法转换标注点的坐标系,数值对了,但是创建的尺寸位置点不对了,
用CAD的坐标标注没有这种问题的,老是Sendcommand来实现很郁闷人的。
请教各位高手,谢谢了!

sym123321 发表于 2008-11-16 20:01:00

晕,没有人帮忙吗?
难道没有人遇到这种问题?

sym123321 发表于 2008-11-16 23:40:00

不知道是不是我说的不太清楚,举个例子:
有一个圆,WCS下圆心坐标为10,10,0
将UCS的原点移动到10,10,0点的位置,WCS为10,10,0,UCS为0,0,0
问题如下:
用CAD本身的命令 DIMORDINATE 创建X方向的坐标,标注点在WCS的10,10,0,尺寸数值为0
在VBA中用AddDimOrdinate方法创建X方向的坐标,标注点同样在WCS的10,10,0,尺寸的数值为10,
用TranslateCoordinates方法将点坐标10,10,0从WCS转换到UCS,得到坐标0,0,0
我在VLISP中用VLA-AddDimOrdinate创建的尺寸依然是这个样子,还要多加一步ENTMOD尺寸的原点坐标为UCS的原点坐标才行。
在VBA中,我用Sendcommand调用CAD命令 DIMORDINATE 或者用 VLAX.CLS 类来调用LISP可以解决,但是用AddDimOrdinate方法怎么也做不到那种效果,不知道是哪个环节没有达到还是AddDimOrdinate方法根本就只能创建绝对坐标值的尺寸?
这个问题难了我很久了,请论坛各位高手帮帮忙,谢谢大家了!

唐僧肉 发表于 2009-2-12 16:55:00

标注完了再move

qingbo9818 发表于 2012-5-4 20:17:00

靠,这么久远了啊!
页: [1]
查看完整版本: [求助]用AddDimOrdinate方法创建坐标标注,要求原点随UCS的原点,如何实现?