MapObject控件使用之图层制作

MapObject控件使用之图层制作
作者：张松伟
zswking@163.com

有些时候将一些固定的数据制作成图层，可以提高程序的速度，而且使用方便。下面我就将对图层的制作方法进行一下简单的说明。
假设我们要将一些经纬度坐标用点的方式画在地图上，那么我们首先要有保存经纬度坐标的数组：m_LonArray, m_LatArray，均为CArray<float,float>型。然后我们在CMyView中增加一些成员变量：

CmoDataConnection pMoCon;
CMoTableDesc desc;
CMoMapLayer layer;
CMoPoint m_point;

好了，是为创建新图层增加一个函数的时候了，在视图类中增加函数：CreateNewLayer()。
BOOL CMyView:: CreateNewLayer ()
{
if (!pMoCon.CreateDispatch(TEXT("MapObjects2.DataConnection")))
return FALSE;
if(!desc.CreateDispatch("MapObjects2.TableDesc"))
return FALSE;

VARIANT vt;
vt.vt = VT_BOOL;
vt.boolVal = VARIANT_FALSE;

pMoCon.SetDatabase((LPCTSTR)"E://Demo//经纬度层"); //设置图层保存目录
if(!pMoCon.Connect())
return FALSE;

//设置图层的字段个数及属性，这里设置两个，一个为Number，一个为Name。表示点的号码及名称。
desc.SetFieldCount(2);
desc.SetFieldType(0,moString);
desc.SetFieldName(0,"Number");
desc.SetFieldLength(0,10);
desc.SetFieldType(1,moString);
desc.SetFieldName(1, "Name");
desc.SetFieldLength(1, 10);

//创建新图层,设置名称、类型及字段。
CmoGeoDataSet geoDataset(pMoCon.AddGeoDataset(“经纬度层”, moShapeTypePoint,
(LPDISPATCH)desc, vt, vt);

if (!layer.CreateDispatch(TEXT("MapObjects2.MapLayer")))
return FALSE;

//设置图层的记录集
layer.SetGeoDataset(geoDataset);
CMoRecordset recs(layer.GetRecords());
CMoFields fields(recs.GetFields());

for(int i=0; i<m_LonArray.GetSize(); i++)
{
recs.AddNew();
m_point.SetX(m_ LonArray.GetAt(i));
m_point.SetY(m_ LatArray.GetAt(i));
SetValue(fields, "Shape",m_point);
SetValue(fields, "Number",m_Number.GetAt(i));//需定义CStringArray m_Number
SetValue(fields, "Name", m_Chname.GetAt(i));//需定义CStrignArray m_Name
recs.Update();
}

//设置点的颜色，并加入地图。
layer.GetSymbol().SetColor(moLightYellow);
CMoLayers layers(m_map.GetLayers());
layers.Add(layer);

return TRUE;
}
好了，调用一下试试效果吧。
本人水平用限，欢迎大家批评指正。