免费视频|新人指南|投诉删帖|广告合作|地信网APP下载

查看: 2495|回复: 3
收起左侧

[经验共享] ArcGIS Engine 用SceneControl实现鼠标点击画3D点的例子

[复制链接]

7658

主题

1160

铜板

2299

好友

技术员

为地信喝彩!

积分
106249
QQ
发表于 2012-10-15 09:19 | 显示全部楼层 |阅读模式
  1. ArcGIS Engine 用SceneControl实现鼠标点击画3D点的例子:

  2. IPoint pt = new PointClass();
  3. ISceneGraph pSG = SC1.SceneGraph;
  4. ISceneViewer pSW = pSG.ActiveViewer;
  5. object pOwner;
  6. object pObject;
  7. pSG.Locate(pSW, e.x, e.y, esriScenePickMode.esriScenePickAll, true, out pt, out pOwner, out pObject);


  8. if (pt == null) return;
  9. IZAware pZAwareline = (IZAware)pt;
  10. ((IZAware)pZAwareline).ZAware = true;
  11. IGeometry geometry = (IGeometry)pt;
  12. IGraphicsContainer3D pGCon3D = SC1.Scene.BasicGraphicsLayer as IGraphicsContainer3D;
  13. IElement pElement = new MarkerElementClass();

  14. IRgbColor pColor=new RgbColorClass ();
  15. pColor .Red =255;
  16. ISimpleMarkerSymbol pSMS = new SimpleMarkerSymbolClass();
  17. pSMS.Size = 30;
  18. pSMS.Color = pColor;
  19. IMarkerElement pMarkerElement = new MarkerElementClass();
  20. pMarkerElement =(IMarkerElement ) pElement;
  21. pMarkerElement.Symbol = pSMS;

  22. pElement.Geometry = geometry;
  23. pGCon3D.AddElement(pElement);

  24. pSC1.SceneGraph.RefreshViewers();

复制代码
游客,如果您要查看本帖隐藏内容请回复
地质啷http://weibo.com/943569550

17

主题

5723

铜板

14

好友

地信院士

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
2610
发表于 2012-10-15 10:37 | 显示全部楼层
来 参观学习了!
  
回复 支持 反对

使用道具 举报

5

主题

880

铜板

5

好友

助理工程师

Rank: 5Rank: 5

积分
135
发表于 2012-11-20 17:06 | 显示全部楼层
多多学学习习

回复 支持 反对

使用道具 举报

0

主题

2230

铜板

15

好友

地信院士

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
2033
发表于 2021-6-22 11:33 | 显示全部楼层
感谢分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

在线客服
快速回复 返回顶部 返回列表