cad提供的座標轉換

命令：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;
}

未完待續