2,142
社区成员
发帖
与我相关
我的任务
分享VB.net+MapX画椭圆为什么不显示呢？
代码如下，小弟菜鸟，请高手指点迷津
Private Sub CreateEllipse()
Dim rect As New MapXLib.Rectangle
Dim createdEllipse As MapXLib.Feature
Dim lyr As MapXLib.Layer = AxMap1.Layers.CreateLayer("Temp layer")
rect.Set(AxMap1.CenterX, AxMap1.CenterY, AxMap1.CenterX + 30, AxMap1.CenterY + 10)
createdEllipse = AxMap1.FeatureFactory.CreateEllipticalRegion(rect, 0, 24, AxMap1.DefaultStyle)
lyr.AddFeature(createdEllipse)
End Sub
代码应该没问题吧，可为什么就是不显示画出来的椭圆呢，运行之后是空白的，为什么啊，急！答对了分数增至100
Private Sub CreateEllipse()
Dim rect As New MapXLib.Rectangle
Dim createdEllipse As MapXLib.Feature
Dim lyr As MapXLib.Layer = AxMap1.Layers.CreateLayer("Temp layer")
rect.Set(AxMap1.CenterX, AxMap1.CenterY, AxMap1.CenterX + 30, AxMap1.CenterY + 10)
createdEllipse = AxMap1.FeatureFactory.CreateEllipticalRegion(rect, 0, 24, AxMap1.DefaultStyle)
lyr.AddFeature(createdEllipse)
End Sub
代码应该没问题吧，可为什么就是不显示画出来的椭圆呢，运行之后是空白的，为什么啊，急！答对了分数增至100
...全文
请发表友善的回复…
发表回复
Helsing 2010-03-14
- 打赏
- 举报
问题没解决，不过分还是要给的，一人20，分了吧，别嫌少
jefferyyangkai 2010-03-12
- 打赏
- 举报
你没有刷新lyr图层
Helsing 2010-03-12
- 打赏
- 举报
这个论坛好冷清啊，发个帖几天无人问津，也就散分的帖能到几十人次
传说中的堕落 2010-03-12
- 打赏
- 举报
查查是不是templayer 可编辑属性 和 坐标体系设置的问题
