AI 助理
备案控制台
开发者社区 数据库 文章 正文

arcEngine 经典代码-编辑

2017-11-14 1271
版权
版权声明：
本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《 阿里云开发者社区用户服务协议》和 《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写 侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
简介：

1 [vc]geo包装1

link: http://blog.csdn.net/gm316/archive/2007/10/07/1813634.aspx

void CagGeometrys::AddTrack(CMapControlDefault &mc, hdcGeometryType gt,long button, long shift, long x, long y, double mapX, double mapY)
{
 //演示rubber的操作，mc中才提供包装结果track，在vba中应该用rubber
 if(e_bUnique)
  e_geos.clear();

 switch(gt)
 {
 case gt_Point:
  {
   IPointPtr pt(__uuidof(Point));
   pt->PutCoords(mapX,mapY);
   IGeometryPtr *g=new IGeometryPtr;
   (*g)=pt;
   e_geos.insert(e_geos.end(),g);
  }
  break;
 case gt_Rectangle:
  {
   IEnvelopePtr env=mc.TrackRectangle();
   IGeometryPtr *g=new IGeometryPtr;
   (*g)=env;
   e_geos.insert(e_geos.end(),g);
  }
  break;

 case gt_Polyline:
  { /*
   IPolylinePtr pl=mc.TrackLine();
   IGeometryPtr *g=new IGeometryPtr;
   (*g)=pl;
   e_geos.insert(e_geos.end(),g);
   */
   
   IActiveViewPtr av;
   IScreenDisplayPtr sd;
   av=mc.GetActiveView();
   av->get_ScreenDisplay(&sd);

   ISymbolPtr sym;
   IGeometryPtr *geo=new IGeometryPtr;
   IRubberBandPtr rp(__uuidof(RubberLine)); 
   rp->TrackNew(sd,sym,&(*geo)); //应该可以在track就有symbol效果
   e_geos.insert(e_geos.end(),geo);

   //转换用QI，应该ok
   //IPolylinePtr line;
   //line=*geo;
  }
  break;

 case gt_Circle:
  {
   IPolygonPtr c=mc.TrackCircle();
   IGeometryPtr *g=new IGeometryPtr;
   (*g)=c;
   e_geos.insert(e_geos.end(),g);
  }
  break;

 case gt_Polygon:
  {
   IPolygonPtr pg=mc.TrackPolygon();
   IGeometryPtr *g=new IGeometryPtr;
   (*g)=pg;
   e_geos.insert(e_geos.end(),g);
  }
  break;

 case gt_Text_Point:
  {

   textInfo *ti=new textInfo;
   IPointPtr pt(CLSID_Point);
   pt->PutCoords(mapX,mapY);
   ti->geo=pt;

   IGetStringDialogPtr gsd(__uuidof(GetStringDialog));
   short res;
   gsd->DoModal(L"title",L"label",L"",NULL,&res);
   CComBSTR bstr;
   CString str;
   gsd->get_Value(&bstr);
   str=bstr;
   strcpy(ti->text,str);
   
   e_texts.insert(e_texts.end(),ti);

  }
  break;

 case gt_Text_Polyline:
  {
   textInfo *ti=new textInfo;
   ti->geo=mc.TrackLine();

   IGetStringDialogPtr gsd(__uuidof(GetStringDialog));
   short res;
   gsd->DoModal(L"title",L"label",L"",NULL,&res);
   CComBSTR bstr;
   CString str;
   gsd->get_Value(&bstr);
   str=bstr;
   strcpy(ti->text,str);
   
   e_texts.insert(e_texts.end(),ti);

  }
  break;

 case gt_Text_Polygon:
  {

   textInfo *ti=new textInfo;
   ti->geo=mc.TrackPolygon(); //可以模拟圆形，矩形等

   IGetStringDialogPtr gsd(__uuidof(GetStringDialog));
   short res;
   gsd->DoModal(L"title",L"label",L"",NULL,&res);
   CComBSTR bstr;
   CString str;
   gsd->get_Value(&bstr);
   str=bstr;
   strcpy(ti->text,str);
   
   e_texts.insert(e_texts.end(),ti);

  }
  break;

 }

 IActiveViewPtr av=mc.GetActiveView();
 av->Refresh();
}

void CagGeometrys::Draw(CMapControlDefault &mc)
{
 //draw geometry
 long i,count;
 count=e_geos.size();
 for(i=0;i<count;i++)
 {
  mc.DrawShape((*e_geos[i]),NULL);
 }

 {
  ISelectionTrackerPtr sk;
  sk.CreateInstance(__uuidof(EnvelopeTracker));

  IActiveViewPtr av=mc.GetActiveView();
  IScreenDisplayPtr sd;
  av->get_ScreenDisplay(&sd);

  IEnvelopePtr env;
  count=e_sels.size();
  for(i=0;i<count;i++)
  {
   (*e_sels[i])->get_Envelope(&env);
   sk->put_Geometry(env);
   sk->Draw(sd,NULL,esriTrackerDominant);
  }
 }

 //文本
 count=e_texts.size();
 for(i=0;i<count;i++)
 {
  IMapPtr map=mc.GetMap();
  IActiveViewPtr av=mc.GetActiveView();
  IScreenDisplayPtr sd;
  av->get_ScreenDisplay(&sd);
/* 屏幕中间
  ITextSymbolPtr t(__uuidof(TextSymbol));
  IFontDispPtr f; //无用途
  t->get_Font(&f);
  t->put_Size(18.0);
  OLE_HANDLE hdc;
  sd->get_hDC(&hdc);
  sd->StartDrawing(hdc,esriNoScreenCache);
  ISymbolPtr s=t;
  sd->SetSymbol(s);
  IAreaPtr a;
  IDisplayTransformationPtr dt;
  sd->get_DisplayTransformation(&dt);
  IEnvelopePtr e;
  dt->get_VisibleBounds(&e);
  a=e;
  IPointPtr pt;
  a->get_Centroid(&pt);
  sd->DrawText(pt,L"test");
*/
  ITextSymbolPtr t(__uuidof(TextSymbol));
  IColorPtr c(__uuidof(RgbColor));
  c->put_RGB(RGB(0,0,255));
  t->put_Color(c);
  IFontDispPtr f; //无用途
  t->get_Font(&f);
  t->put_Size(18.0);
  OLE_HANDLE hdc;
  sd->get_hDC(&hdc);
  sd->StartDrawing(hdc,esriNoScreenCache);
  ISymbolPtr s=t;
  sd->SetSymbol(s);
  USES_CONVERSION;
  //点位置是字符底部中间
  sd->DrawText(e_texts[i]->geo,A2W(e_texts[i]->text));
  sd->FinishDrawing();
 }
}

void CagGeometrys::HitTest(double x, double y)
{
 /*
esriGeometryNull          = 0
esriGeometryPoint         = 1
esriGeometryMultipoint    = 2
esriGeometryPolyline      = 3
esriGeometryPolygon       = 4
esriGeometryEnvelope      = 5
esriGeometryPath          = 6
esriGeometryAny           = 7
esriGeometryMultiPatch    = 9
esriGeometryRing          = 11
esriGeometryLine          = 13
esriGeometryCircularArc   = 14
esriGeometryBezier3Curve  = 15
esriGeometryEllipticArc   = 16
esriGeometryBag           = 17
esriGeometryTriangleStrip = 18
esriGeometryTriangleFan   = 19
esriGeometryRay           = 20
esriGeometrySphere        = 21
*/
/*
HRESULT HitTest( 
  IPoint* QueryPoint, 
  double searchRadius, 
  esriGeometryHitPartType geometryPart, 
  IPoint* hitPoint, 
  double* hitDistance, 
  long* hitPartIndex, 
  long* hitSegmentIndex, 
  VARIANT_BOOL* bRightSide, 
  VARIANT_BOOL* bHit 
);
*/
 e_sels.clear();
 
 esriGeometryType gt;
 long i,count=e_geos.size();
 for(i=0;i<count;i++)
 {
  (*e_geos[i])->get_GeometryType(&gt);
  switch(gt)
  {
  case esriGeometryPoint:
   { //OK,但是被选择的显示方式有问题
    IHitTestPtr ht;
    IPointPtr pt;
    pt=e_geos[i];
    ht=pt;

    IPointPtr qp(__uuidof(Point));
    qp->PutCoords(x,y);

    IPointPtr hp(__uuidof(Point));
    double hd;
    long hpi,hs;
    short rs,h;
    ht->HitTest(qp,5.0,esriGeometryPartBoundary,hp,&hd,&hpi,&hs,&rs,&h);

    if(h==-1)
    {
     e_sels.insert(e_sels.end(),e_geos[i]);
    }
   }
   break;
  case esriGeometryPolyline:
   {
    IHitTestPtr ht;
    IPolylinePtr pl;
    pl=e_geos[i];
    ht=pl;

    IPointPtr qp(__uuidof(Point));
    qp->PutCoords(x,y);

    IPointPtr hp(__uuidof(Point));
    double hd;
    long hpi,hs;
    short rs,h;
    ht->HitTest(qp,5.0,esriGeometryPartBoundary,hp,&hd,&hpi,&hs,&rs,&h);

    if(h==-1)
    {
     e_sels.insert(e_sels.end(),e_geos[i]);
    }
   }
   break;

  case esriGeometryEnvelope:
  case esriGeometryPolygon:
   {
    IPointPtr qp(__uuidof(Point));
    qp->PutCoords(x,y);

    IRelationalOperatorPtr ro;
    ro=e_geos[i];
    short yes;
    ro->Contains(qp,&yes);
    if(yes==-1)
    {
     e_sels.insert(e_sels.end(),e_geos[i]);
    }
   }
   break;
  }
 }

}

long CagGeometrys::GetSelectCount()
{
 return (e_sels.size());
}

void CagGeometrys::ClearSelect()
{
 e_sels.clear();
}

BOOL CagGeometrys::DeleteSelect()
{
 long i,j,count1,count=e_sels.size();
 
 //sel中不一定是用了geos中顺序，并且选择后可能添加了新的geo
 for(i=0;i<count;i++)
 {
  count1=e_geos.size();
  for(j=0;j<count1;j++)
  {
   if(e_geos[j]==e_sels[i])
   {
    e_geos.erase(e_geos.begin()+j);
    break;
   }
  }
 }

 return TRUE;
}

void CagGeometrys::Move(CMapControlDefault &mc)
{
 IActiveViewPtr av;
 av=mc.GetActiveView();

 IScreenDisplayPtr sd;
 av->get_ScreenDisplay(&sd);
 
 ISymbolPtr sym;
 IGeometryPtr geo=(*e_sels[0]);
 IRubberBandPtr rb;
 short c;

 esriGeometryType gt;
// long i,count=e_sels.size();
// for(i=0;i<count;i++) 每次只可以移动一个shape
 {
  (*e_sels[0])->get_GeometryType(&gt);
  switch(gt)
  {
  case esriGeometryPoint:
   rb.CreateInstance(CLSID_RubberPoint);
   break;
  case esriGeometryPolyline:
   rb.CreateInstance(CLSID_RubberLine);
   break;

  case esriGeometryEnvelope:
   rb.CreateInstance(CLSID_RubberEnvelope); //移动后图形消失 
//   rb.CreateInstance(CLSID_RubberPolygon);//无效果
   break;

  case esriGeometryPolygon: //包括了circle
   rb.CreateInstance(CLSID_RubberPolygon);
   break;
  }
 }

 if(rb!=NULL)
  rb->TrackExisting(sd,sym,geo,&c); 
 av->Refresh();

}

BOOL CagGeometrys::AddImportPoint(CString sPathFile)
{
 FILE *f;
 f=fopen(sPathFile,"rt");
 if(f==NULL)
 {
  AfxMessageBox("无法打开指定文件.");
  return FALSE;
 }

 IPointCollectionPtr pc(__uuidof(Multipoint));
 IPointPtr pt;
 double x,y;
 while(1)
 {
  if(fscanf(f,"%lf %lf",&x,&y)!=2)
   break;
  
  pt.CreateInstance(CLSID_Point);
  pt->put_X(x);
  pt->put_Y(y);
  pc->AddPoint(pt);
 }
 fclose(f);

 if(e_bUnique)
  e_geos.clear();

 IGeometryPtr *g=new IGeometryPtr;
 (*g)=pc;
 e_geos.insert(e_geos.end(),g);

 return TRUE;
}


BOOL CagGeometrys::AddImportPolyline(CString sPathFile)
{
 FILE *f;
 f=fopen(sPathFile,"rt");
 if(f==NULL)
 {
  AfxMessageBox("无法打开指定文件.");
  return FALSE;
 }

 double x,y;
 IPointPtr pt;
 IPointCollectionPtr pts(CLSID_Polyline);
 while(1)
 {
  if(fscanf(f,"%lf %lf",&x,&y)!=2)
   break;
  
  pt.CreateInstance(CLSID_Point);
  pt->put_X(x);
  pt->put_Y(y);
  pts->AddPoint(pt);
 }
 fclose(f);

 if(e_bUnique)
  e_geos.clear();

 IGeometryPtr *g=new IGeometryPtr;
 (*g)=pts;
 e_geos.insert(e_geos.end(),g);

 return TRUE;
}

BOOL CagGeometrys::AddImportPolygon(CString sPathFile)
{
 FILE *f;
 f=fopen(sPathFile,"rt");
 if(f==NULL)
 {
  AfxMessageBox("无法打开指定文件.");
  return FALSE;
 }

 IPolygonPtr pg(CLSID_Polygon);

 double x,y;
 IPointPtr pt;
 IPointCollectionPtr pts(__uuidof(Ring));
 while(1)
 {
  if(fscanf(f,"%lf %lf",&x,&y)!=2)
   break;
  
  pt.CreateInstance(CLSID_Point);
  pt->put_X(x);
  pt->put_Y(y);
  pts->AddPoint(pt);
 }
 fclose(f);

 IRingPtr r=pts;
 r->Close();
 IGeometryCollectionPtr gc=pg;
 gc->AddGeometry(r);

 if(e_bUnique)
  e_geos.clear();

 IGeometryPtr *g=new IGeometryPtr;
 (*g)=pg;
 e_geos.insert(e_geos.end(),g);

 return TRUE;
}

BOOL CagGeometrys::AddPoint(double x, double y)
{
 if(e_bUnique)
  e_geos.clear();

 IPointPtr pt(__uuidof(Point));
 pt->PutCoords(x,y);
 IGeometryPtr *g=new IGeometryPtr;
 (*g)=pt;
 e_geos.insert(e_geos.end(),g);

 return TRUE;
}

BOOL CagGeometrys::AddCircle(double x, double y, double r)
{
 if(e_bUnique)
  e_geos.clear();

 IPointPtr pt(__uuidof(Point));
 IConstructCircularArcPtr cca(__uuidof(CircularArc));
 pt->PutCoords(x,y);
 cca->ConstructCircle(pt,r,-1);

 IGeometryPtr *g=new IGeometryPtr;
 (*g)=cca;
 e_geos.insert(e_geos.end(),g);

 return TRUE;
}

 

2 绘制一条polyline

可以使用AE里面的  IRubberBand 接口画在MapControl上:

  IRubberBand rubberLine = new RubberLineClass();
  IPolyline polyLine = (IPolyline)rubberLine.TrackNew(pActiveView.ScreenDisplay, null);

//设置图形的样式
  m_Symbol = SetDisplaySymbol(polyLine);
      
   //画出图形
  pActiveView.ScreenDisplay.StartDrawing(m_QueryMap.ActiveView.ScreenDisplay.hDC, (short)esriScreenCache.esriNoScreenCache);
  pActiveView.ScreenDisplay.DrawPolyline(pGeometry);
  pActiveView.Refresh();
  pActiveView.ScreenDisplay.FinishDrawing();

 

通过point构造Segment，再构造path，再构造polyline

用到ISegmentCollection,IPointCollection等接口，帮助里有个例子

The following subs are demonstrating how to create valid polylines efficiently.

A. Geometry type: Polyline

1. createMultipartPolylinePathSegmentCollection: Create a multipart polyline using path via ISegmentCollection.

2. createMultipartPolylinePathPointCollection: Create a multipart polyline using path via IPointCollection.

private IGeometry CreateShape(int x1,int y1,int x2,int y2)
                {
                        IPoint p1 = this.axMapControl1.ActiveView.ScreenDisplay.DisplayTransformation.ToMapPoint(x1,y1);
                        IPoint p2 = this.axMapControl1.ActiveView.ScreenDisplay.DisplayTransformation.ToMapPoint(x2,y2);
                        IPolyline line = new PolylineClass();
                        line.FromPoint=p1;
                        line.ToPoint=p2;
                        IGeometry lineGeometry = line as IGeometry;
                          retrun lineGeometry ;

                }
 
利用上面创建好的Line，在grahic上画线，嗯。。里面的代码要改动一下。因为是直接贴的以前写的东西
private void DrawShape(IGeometry line)
                {
                        pgc.DeleteAllElements();
                        //定义颜色
                        //定义线符号
                        IRgbColor lcolor = Utility.GetRGBColor(btnLColor.BackColor);
                        ISimpleLineSymbol outline = new SimpleLineSymbolClass();
                        if(this.txtWidth.Text.Trim()=="")
                                outline.Width=0;
                        else
                                outline.Width=Double.Parse(this.txtWidth.Text);

                        outline.Color = lcolor;
                        outline.Style = (esriSimpleLineStyle)(((StringIntObject)this.cbLineStyle.SelectedItem).i);

                        //定义使用填充符号的面
                        ILineElement LineE = new LineElementClass();
                        LineE.Symbol=outline;
                        IElement pElement = LineE as IElement;
                        pElement.Geometry=line ;
                        pgc.AddElement(pElement,0);
                        axMapControl1.Refresh( esriViewDrawPhase.esriViewGraphics, null,null );

                }





    本文转自wenglabs博客园博客，原文链接：http://www.cnblogs.com/xiexiaokui/archive/2008/07/26/1251960.html ，如需转载请自行联系原作者

文章标签：
Perl
关系型数据库
橘子红了呐
目录
相关文章
众所周知
|
5月前
|
Python
惊呆了！学会这一招，你的Python上下文管理器也能玩出花样来文管理器也能玩出花样来
【7月更文挑战第6天】Python的上下文管理器是资源优雅管理的关键，与with语句结合，确保资源获取和释放。通过实现`__enter__`和`__exit__`，不仅能做资源分配和释放，还能扩展实现如计时、自动重试、事务处理等功能。例如，TimerContextManager类记录代码执行时间，展示了上下文管理器的灵活性。学习和利用这一机制能提升代码质量，增强功能，是Python编程的必备技巧。
众所周知
37 0
瑞崽崽崽
|
7月前
|
前端开发
前端知识笔记（十三）———单全选框控制方法，炒鸡无敌方便！！！
前端知识笔记（十三）———单全选框控制方法，炒鸡无敌方便！！！
瑞崽崽崽
41 0
呆呆敲代码的小Y
|
vr&ar 图形学
【Unity3D 灵巧小知识点】 ☀️ | 快速查找场景中勾选Raycast Target的游戏对象
【Unity3D 灵巧小知识点】 ☀️ | 字符串截取，截取某个路径字符串中 末尾文件 的名字 47/100 发布文章 zhangay1998 未选择任何文件 Unity 小科普 老规矩，先介绍一下 Unity 的科普小知识： Unity是 实时3D互动内容创作和运营平台 。 包括游戏开发、美术、建筑、汽车设计、影视在内的所有创作者，借助 Unity 将创意变成现实。 Unity 平台提供一整套完善的软件解决方案，可用于创作、运营和变现任何实时互动的2D和3D内容，支持平台包括手机、平板电脑、PC、游戏主机、增强现实和虚拟现实设备。
呆呆敲代码的小Y
393 0
【Unity3D 灵巧小知识点】 ☀️ | 快速查找场景中勾选Raycast Target的游戏对象
呆呆敲代码的小Y
|
vr&ar 图形学
【Unity3D 灵巧小知识点】 ☀️ | 层级面板中的 ‘小手指‘ 作用: 在Scen中将该物体设置为不可选中状态
Unity 小科普 老规矩，先介绍一下 Unity 的科普小知识： Unity是 实时3D互动内容创作和运营平台 。 包括游戏开发、美术、建筑、汽车设计、影视在内的所有创作者，借助 Unity 将创意变成现实。 Unity 平台提供一整套完善的软件解决方案，可用于创作、运营和变现任何实时互动的2D和3D内容，支持平台包括手机、平板电脑、PC、游戏主机、增强现实和虚拟现实设备。
呆呆敲代码的小Y
334 0
【Unity3D 灵巧小知识点】 ☀️ | 层级面板中的 ‘小手指‘ 作用: 在Scen中将该物体设置为不可选中状态
橘子红了呐
c#+ArcEngine中的IGroupLayer的用法
橘子红了呐
1504 0
技术小甜
ArcEngine 0x8004023C
技术小甜
1426 0
橘子红了呐
arcEngine 经典代码（转）
橘子红了呐
1078 0
橘子红了呐
|
定位技术 C#
arcengine 开发经典帖（转）
橘子红了呐
2615 0
橘子红了呐
ArcEngine的ToolbarControl解析
橘子红了呐
1566 0
科技小能手
|
Windows
总述提高计算机性能的方法
科技小能手
995 0