脚本绘制MICAPS第一类数据的问题

孤蓝et

【1】绘制Station_model类型，怎么使用啊？就是display中引用那个变量名？我在帮助文档么有找到哦。。。
myApp.SetDrawType("Station_Model")
myApp.Display("????")

【2】今天使用脚本绘制micaps第一类数据，发现个问题，在首先绘制Contour类型后，再绘制Station_point类型，会提示出错。假如首先绘制Contour后，绘制Barb都是正常的。不知道这里是不是bug？

疑似错误区域：
myApp.SetDrawType("Contour")
myApp.Display("Pressure")

myApp.SetDrawType("Station_Point")
myApp.Display("CloudCover")

错误信息如下：
D:\Micaps2PPT>miscript run_surface.py
11120508.000
Traceback (most recent call last):
  File "run_surface.py", line 98, in <module>
TypeError: 无法将类型为“MeteoInfoC.Legend.PolyLineBreak”的对象强制转换为类型“
MeteoInfoC.Legend.PointBreak”。

第一类数据示例： 11120502.000 (72.61 KB, 下载次数: 1)

2011-12-28 13:17 上传

点击文件名下载附件
阅读权限: 100

1. 
   
2. # This Python file uses the following encoding: GB2312
   
3. #---- 引入类库
   
4. import clr
   
5. clr.AddReferenceByPartialName("System")
   
6. clr.AddReferenceByPartialName("System.Windows.Forms")
   
7. clr.AddReferenceByPartialName("System.Drawing")
   
8. from System import *
   
9. from System.Windows.Forms import *
   
10. from System.Drawing import *
    
11. clr.AddReference("MeteoInfoC.dll")
    
12. from MeteoInfoC import *
    
13. from MeteoInfoC.Layout import *
    
14. from MeteoInfoC.Data import *
    
15. 
    
16. 
    
17. 
    
18. #---- 创建MIApp类的对象
    
19. myApp = MIApp()
    
20. #---- 添加图层
    
21. #---- 设置图层渲染
    
22. #myApp.OpenLayer("C:\\Program Files\\MeteoInfo\\Map\\bou2_4p.shp")
    
23. #myApp.SetLegendBreak("bou2_4p.shp",0,Color.Yellow,Color.Gray,1,True,False,True)
    
24. 
    
25. #只填充轮廓，没有填充色的设置如下!!
    
26. myApp.OpenLayer("D:\\meteoinfocdemo\\新疆地图\\新疆全区.shp")
    
27. myApp.SetLegendBreak("新疆全区.shp",0,Color.Yellow,Color.Black,2,True,False,True)
    
28. 
    
29. 
    
30. 
    
31. 
    
32. myApp.OpenLayer("C:\\Program Files\\MeteoInfo\\Map\\lowres")
    
33. myApp.OpenLayer("C:\\Program Files\\MeteoInfo\\Map\\cnhimap")
    
34. 
    
35. myApp.OpenLayer("C:\\Program Files\\MeteoInfo\\Map\\res1_4m.shp")
    
36. myApp.SetLegendBreak("res1_4m.shp",0,5,Color.Red,Color.Black,True,True,True)
    
37. 
    
38. 
    
39. #myApp.OpenLayer("D:\\最新开发\\航路\\air_line.shp")
    
40. 
    
41. 
    
42. 
    
43. #---- 获取矢量图层对象，并设置标注
    
44. aLayer = myApp.GetVectorLayer("res1_4m.shp")
    
45. aLayer.LabelSet.FieldName = "NAME";
    
46. aLayer.LabelSet.LabelFont = Font("楷体", 10);
    
47. aLayer.LabelSet.Offset = 15;
    
48. aLayer.AddLabels();
    
49. 
    
50. #---- Lambert投影
    
51. myApp.ProjectLayers("+proj=lcc+lat_1=15+lat_2=45+lon_0=80")
    
52. 
    
53. #---- 按照经纬度范围缩放地图
    
54. myApp.ZoomLonLat(50,97,32,55)
    
55. 
    
56. 
    
57. 
    
58. #---- 设置DefalutLayoutMap（图层显示）
    
59. myApp.MapLayout.DefaultLayoutMap.DrawGridLine = True
    
60. myApp.MapLayout.DefaultLayoutMap.DrawNeatLine = True
    
61. myApp.MapLayout.DefaultLayoutMap.Left = 40
    
62. myApp.MapLayout.DefaultLayoutMap.Top = 50
    
63. myApp.MapLayout.DefaultLayoutMap.Width = 640
    
64. myApp.MapLayout.DefaultLayoutMap.Height = 400
    
65. 
    
66. #---- 设置DefaultLegend（图例）
    
67. myApp.MapLayout.DefaultLegend.LegendStyle = LegendStyleEnum.Normal               
    
68. myApp.MapLayout.DefaultLegend.DrawNeatLine = True
    
69. myApp.MapLayout.DefaultLegend.Title = " "
    
70. myApp.MapLayout.DefaultLegend.BackColor = Color.White
    
71. myApp.MapLayout.DefaultLegend.Font = Font("Arial", 14)
    
72. myApp.MapLayout.DefaultLegend.Left =750
    
73. myApp.MapLayout.DefaultLegend.Top =410
    
74. 
    
75. 
    
76. #---- 设置DefaultTitle（图形标题）
    
77. myApp.MapLayout.DefaultTitle.SetFont("黑体", 12)
    
78. myApp.MapLayout.DefaultTitle.Top = 10
    
79. myApp.MapLayout.DefaultTitle.Left = 100
    
80. 
    
81. 
    
82. #---- 设置起始结束时间
    
83. sTime = DateTime.Parse("2011-12-5 8:00")
    
84. 
    
85.    
    
86. myApp.RemoveDataLayers()
    
87. inFile = sTime.ToString("yyMMddHH") + ".000"
    
88. print inFile
    
89. 
    
90. 
    
91. 
    
92. #---- 气压
    
93. myApp.SetAntiAlias(True)
    
94. myApp.SetLegendScheme("C:\\Program Files\\MeteoInfo\\Legend\\Surface_PSL.lgs")
    
95. myApp.OpenMICAPSData("D:\\Micaps2PPT\\datatran\\surface\\plot\" + inFile)  
    
96. myApp.SetDrawType("Contour")
    
97. myApp.Display("Pressure")
    
98. 
    
99. myApp.SetDrawType("Station_Point")
    
100. myApp.Display("CloudCover")
     
101. 
     
102. 
     
103. #myApp.SetDrawType("Station_Model")
     
104. myApp.SetDrawType("Barb")
     
105. myApp.MeteoDataInfo.MeteoUVStr.IsUV = False
     
106. myApp.Display("WindDirection","WindSpeed")
     
107. 
     
108. 
     
109. 
     
110. print "Display finished"  
     
111. 
     
112. #---- 调整图层顺序（以避免压盖）
     
113. myApp.MoveLayerToTop("res1_4m.shp")
     
114. myApp.MoveLayerToTop("新疆全区.shp")
     
115. myApp.MoveLayerToTop("新疆全区.shp")
     
116. 
     
117. #---- 设置标题名称
     
118. title = sTime.ToString("yyyy-MM-dd HH") + "时 500hPa高度场和风场  700hPa相对湿度≥80%（EC）"
     
119. myApp.SetTitle(title)     
     
120. 
     
121. 
     
122. #---- 绘制图形
     
123. myApp.MapLayout.PaintGraphics()
     
124. 
     
125. #---- 输出图形为文件
     
126. outFile = "EC_" + sTime.ToString("yyyyMMddHH") + ".png"
     
127. print outFile
     
128. myApp.SaveFigure("D:\\Micaps2PPT\" + outFile)  
     
129. 
     
130. #---- 显示程序窗体（只是为了看效果，自动运行时不需要）
     
131. Application.Run(myApp)
     

复制代码

MeteoInfo

（1）随便写一个变量名就可以了。
（2）你在脚本中用到SetLegendScheme（）方法，这会使其后绘制的图形都用这个图例。你设置的图例是Polyline类型，而Station_Point是Point类型，所以会报错。可以在绘制station_point图形语句之前加上myApp.UseDefaultLegendScheme = False，这样就不会使用之前的缺省图例了。今后会在程序里加上自动判断和处理这种冲突的功能。

孤蓝et

MeteoInfo 发表于 2011-12-28 13:31

                               
登录/注册后可看大图

（1）随便写一个变量名就可以了。
（2）你在脚本中用到SetLegendScheme（）方法，这会使其后绘制的图形都用 ...

哦，没考虑到图例的问题。谢谢斑竹啦。
我现在去试试。

孤蓝et

脚本绘图底图大小的设置？
如何设置修改脚本绘图的尺寸？我修改myAPP.MapLayput.ActiveLayoutMap.Height 和Width，貌似只会修改绘图区域的大小，实际存储的图片的尺寸没有变化啊？怎样才能修改这个，求版主解答。谢谢。

MeteoInfo

孤蓝et 发表于 2012-3-16 20:52

                               
登录/注册后可看大图

脚本绘图底图大小的设置？
如何设置修改脚本绘图的尺寸？我修改myAPP.MapLayput.ActiveLayoutMap.Height 和 ...

用MIApp类的SetPaperSize(int width, int height)函数，例如：
myApp.SetPaperSize(340, 750)

我是吉星

先看看是怎么弄得啊