MeteoInfo脚本示例：创建Polygon图层

MeteoInfo

用脚本程序来创建一个Polygon图层：

1. #--------------------------------------------------------        # Author: Yaqiang Wang                                          
   
2. # Date: 2013-11-14                                                
   
3. # Purpose: Create a polygon layer  
   
4. # Note: Sample                                                   
   
5. #-----------------------------------------------------------  
   
6. #---- Import clr and classes
   
7. import clr
   
8. clr.AddReference("MeteoInfoC.dll")
   
9. from System import *
   
10. from System.Collections.Generic import *
    
11. from MeteoInfoC import *
    
12. from MeteoInfoC.Layer import *
    
13. from MeteoInfoC.Shape import *
    
14. from MeteoInfoC.Legend import *
    
15. 
    
16. #---- Create a polygon layer
    
17. print 'Create a polygon layer...'
    
18. pLayer = VectorLayer(ShapeTypes.Polygon)
    
19. pLayer.LayerName = "Test_Polygon"
    
20. pLayer.Visible = True
    
21. pLayer.EditAddField("ID", Int32)
    
22. 
    
23. #---- Create a polygon shape
    
24. plist = List[PointD]()
    
25. plist.Add(PointD(80, 35))
    
26. plist.Add(PointD(83, 38))
    
27. plist.Add(PointD(86, 40))
    
28. plist.Add(PointD(88, 38))
    
29. plist.Add(PointD(86, 36))
    
30. plist.Add(PointD(82, 34))
    
31. plist.Add(PointD(80, 35))
    
32. pShape = PolygonShape()
    
33. pShape.Points = plist
    
34. 
    
35. #--- Add polygon shape into the polygon layer
    
36. shapeNum = pLayer.ShapeNum
    
37. i = 1
    
38. if pLayer.EditInsertShape(pShape, shapeNum):
    
39.   pLayer.EditCellValue("ID", shapeNum, i)
    
40.   i += 1
    
41. 
    
42. pLayer.UpdateLegendScheme(LegendType.SingleSymbol, "ID")
    
43. 
    
44. #---- Add the polygon layer
    
45. mipy.MapDocument.ActiveMapFrame.AddLayer(pLayer)
    
46. 
    
47. print 'Finished!'

#--------------------------------------------------------        # Author: Yaqiang Wang                                           <br /> # Date: 2013-11-14                                                 <br /> # Purpose: Create a polygon layer  <br /> # Note: Sample                                                   <br /> #-----------------------------------------------------------  <br /> #---- Import clr and classes<br /> import clr<br /> clr.AddReference("MeteoInfoC.dll")<br /> from System import *<br /> from System.Collections.Generic import *<br /> from MeteoInfoC import *<br /> from MeteoInfoC.Layer import *<br /> from MeteoInfoC.Shape import *<br /> from MeteoInfoC.Legend import *<br /> <br /> #---- Create a polygon layer<br /> print 'Create a polygon layer...'<br /> pLayer = VectorLayer(ShapeTypes.Polygon)<br /> pLayer.LayerName = "Test_Polygon"<br /> pLayer.Visible = True<br /> pLayer.EditAddField("ID", Int32)<br /> <br /> #---- Create a polygon shape<br /> plist = List[PointD]()<br /> plist.Add(PointD(80, 35))<br /> plist.Add(PointD(83, 38))<br /> plist.Add(PointD(86, 40))<br /> plist.Add(PointD(88, 38))<br /> plist.Add(PointD(86, 36))<br /> plist.Add(PointD(82, 34))<br /> plist.Add(PointD(80, 35))<br /> pShape = PolygonShape()<br /> pShape.Points = plist<br /> <br /> #--- Add polygon shape into the polygon layer<br /> shapeNum = pLayer.ShapeNum<br /> i = 1<br /> if pLayer.EditInsertShape(pShape, shapeNum):<br />   pLayer.EditCellValue("ID", shapeNum, i)<br />   i += 1<br /> <br /> pLayer.UpdateLegendScheme(LegendType.SingleSymbol, "ID")<br /> <br /> #---- Add the polygon layer<br /> mipy.MapDocument.ActiveMapFrame.AddLayer(pLayer)<br /> <br /> print 'Finished!'

运行结果：

Mc.Fish

Eudora99

LZ,我才学习MeteoInfo,感觉它很方便，我刚刚把您的这个脚本拿出运行了一下，它报错信息如图所示，请问这是怎么回事儿啊，我要怎么办啊？

MeteoInfo

Eudora99 发表于 2015-9-10 17:47
LZ,我才学习MeteoInfo,感觉它很方便，我刚刚把您的这个脚本拿出运行了一下，它报错信息如图所示，请问这是 ...

没出现过这种错误，不知道你怎么弄的。

yjx2563808075

楼主，公开一下code吧

冬蝉夏艾

如何测量两点之间的距离

冬蝉夏艾

如何创建一个Polygon的圆图层呢，形状是圆形？

冬蝉夏艾

如何创建圆或者椭圆呢？

冬蝉夏艾

用CircleShape画台风半径的图层，画出来一个菱形

冬蝉夏艾

王老师，如何创建圆形图层呢？