[求助]用户坐标问题(不好意思,同样的问题问过一次)
大家都用代码画过这样的图吧,不知道如何做能方便些。如果用转换矩阵的话,那还不如现在世界坐标下话,画完之后全部选择或者形成块,再move到合适的位置。 问题时这样的:
我要画一个平面的三视图,为了画图方便,需要定义3个用户坐标。有没有方便的方法呢?就像转到一个用户坐标中后,直接可以在里面画?
用transformby方法
或
Signature
RetVal = object.TranslateCoordinates(OriginalPoint, From, To, Disp[, OCSNormal])
Object
The object or objects this method applies to.
OriginalPoint
Variant (three-element array of doubles); input-only
The 3D WCS coordinates specifying the original coordinates to be translated. This parameter can be treated as a point or a displacement vector depending on the value of Disp.
From
AcCoordinateSystem enum; input-only
The coordinate system from which the point originates.
acWorld
acUCS
acOCS
acDisplayDCS
acPaperSpaceDCS
To
AcCoordinateSystem enum; input-only
The coordinate system to which the point will be converted.
acWorld
acUCS
acOCS
acDisplayDCS
acPaperSpaceDCS
Disp
Integer; input-only
A displacement vector flag.
TRUE: OriginalPoint is treated as a displacement vector.
FALSE: OriginalPoint is treated as a point.
OCSNormal
Variant (three-element array of doubles); input-only;optional
The normal for the OCS.
RetVal
Variant (three-element array of doubles)
The translated 3D coordinate.
Remarks
You cannot directly translate a coordinate from one OCS to another OCS. To do this, first translate the coordinate from one OCS to an intermediary coordinate system such as the WCS. Then translate that coordinate into the second OCS.
To translate a point on aorobject from OCS to WCS:
1. Get the X and Y coordinates of the OCS point from theorproperty.
2. Get the Z coordinate of the OCS point from theproperty.
3. Get the Normal for the polyline from theproperty.
4. Call TranslateCoordinates using the X, Y, Z coordinates and the Normal.
谢谢飞狐兄弟。
我的意思是先转换到用户坐标,然后直接在里面作图。不是说先在世界坐标里把图做好,在转换到用户坐标里。如果这样的话,那还不如画好,再移动了。 转换到用户坐标,然后直接在里面作图,在VBA里是做不到的 明白了。
多谢。
页:
[1]