十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
VC+MapX鹰眼实现3
创新互联建站长期为超过千家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为临沭企业提供专业的网站设计、成都网站设计,临沭网站改版等技术服务。拥有十载丰富建站经验和众多成功案例,为您定制开发。
///得到鼠标单击点的地理坐标
sngX = PreX;
sngY = PreY;
double dblMapX1, dblMapY1;
m_eagleMapX.ConvertCoord(sngX, sngY, dblMapX1, dblMapY1,
miScreenToMap);
///得到鼠标当前点的地理坐标
double dblMapX2, dblMapY2;
m_eagleMapX.ConvertCoord(X, Y, dblMapX2, dblMapY2,
miScreenToMap);
///设置矩形的四角
pntMap1.CreateDispatch(pntMap1.GetClsid());
pntMap2.CreateDispatch(pntMap2.GetClsid());
pntMap3.CreateDispatch(pntMap3.GetClsid());
pntMap4.CreateDispatch(pntMap4.GetClsid());
pntMap1.Set(dblMapX1, dblMapY2);
pntMap2.Set(dblMapX2, dblMapY2);
pntMap3.Set(dblMapX2, dblMapY1);
pntMap4.Set(dblMapX1, dblMapY1);
///将矩形的四角加入点集中
pntsMap.CreateDispatch(pntsMap.GetClsid());
pntsMap.Add(pntMap1);
pntsMap.Add(pntMap2);
pntsMap.Add(pntMap3);
pntsMap.Add(pntMap4);
pntsMap.Add(pntMap1);
styLine.SetLineColor(miColorBlack); ///定义样式的线条颜色
styLine.SetLineWidth(1); ///定义样式的线条宽度
styLine.SetLineStyle(3); ///虚线
///将导航图鹰眼层所有对象清空
ftrs = m_eagleMapX.GetLayers().Item("EagleLayer").AllFeatures();
for(int i = 1; i = ftrs.GetCount(); i++)
{
m_eagleMapX.GetLayers().Item("EagleLayer").DeleteFeature(ftrs.Item(i));
}
///在导航图鹰眼层画虚线矩形框,框出用户预选择的范围
CMapXFeature ftrMap;
COleVariant pntsVt, styVt;
pntsVt.vt = VT_DISPATCH;
pntsVt.pdispVal = pntsMap.m_lpDispatch;
pntsVt.pdispVal-AddRef();
styVt.vt = VT_DISPATCH;
styLine.CreateDispatch(styLine.GetClsid());
styVt.pdispVal = styLine.m_lpDispatch;
styVt.pdispVal-AddRef();
ftrMap = m_eagleMapX.GetFeatureFactory().CreateLine(pntsVt, styVt);
m_eagleMapX.GetLayers().Item("EagleLayer").AddFeature(ftrMap);
///设置鼠标状态为"Move"
strMouseState = "Move";
}
做GIS的? 把找到的C#程序,去找个翻译软件,翻译成VB。net吧! 我最近也是在学C#。
不是。
鹰眼图是GIS中一个基本的功能,鹰眼图,顾名思义,在鹰眼图上可以像从空中俯视一样查看地图框中所显示的地图在整个图中的位置.Windows下的可视化开发工具大家接触得最多的就是,下面将详细介绍在VC与VB环境下鹰眼图的具体实现,从这也可以看出利用MapX开发GIS应用程序的方法和技巧。
流氓,一般是指不务正业、经常寻衅闹事、文化素质较低的人,也指那些对他人不尊重、对他人有下流语言或动作的人。