命令:MAPCSASSIGN(AutoCAD Map 3D)
WGS84经纬度坐标转换为WGS84投影坐标:
bool CCadFunction::CRS84ToWGS84(AcGePoint3d& ptSrc, AcGePoint3d& ptDes)
{
ads_point ptSrcTemp;
ptSrcTemp[X] = ptSrc.x;
ptSrcTemp[Y] = ptSrc.y;
ptSrcTemp[Z] = ptSrc.z;
if (RTNORM != ade_projsetsrc(_T("CRS:84")))
return false;
if (RTNORM != ade_projsetdest(_T("WGS84.PseudoMercator")))
return false;
ads_point ptDesTemp;
if (RTNORM != ade_projptforward(ptSrcTemp, ptDesTemp))
return false;
ptDes = asPnt3d(ptDesTemp);
return true;
}
未完待续