CogTransform2DLinear基础用法
- CogTransform2DLinear:是一种带有位移、旋转、倾斜、缩放的两个坐标系(SelectedSpaceName)的转化工具。分别有一下几个参数:
位移参数:TranslationX、TranslationY
缩放参数:Scaling
旋转参数:Rotation
倾斜参数:Skew
CogTransform2DLinear其实就是先将目标坐标系在基准坐标系姿态参数(上面列出的参数)代入后,后面利用CogTransform2DLinear对象就可以把目标坐标系的所有坐标映射到基准坐标系上
- 例子:如下图两个直角坐标系,规定:
红色的为:基准坐标系
蓝色的为:目标坐标系
目标坐标系的原点在基坐标系中的坐标为(2,1),且两个坐标系的夹角为0度
- 把目标坐标系(蓝色)在基坐标系(红色)的姿态参数传入CogTransform2DLinear对象
Dim Transform2DLinear_Object As CogTransform2DLinear = New CogTransform2DLinear()
Transform2DLinear_Object.TranslationX = 2 '位移X
Transform2DLinear_Object.TranslationY = 1 '位移Y
Transform2DLinear_Object.Rotation = 0 '旋转
Transform2DLinear_Object.Scaling = 1 '缩放
- 任何已知在目标坐标系的点可以求出该点在基坐标系中的坐标
如目标坐标系的原点(0,0)求出该点在基坐标系中的坐标
Dim Outx As Double = 0
Dim Outy As Double = 0