阅读:2065回复:3
问两个简单的问题?
<P>本人是初学者,问两个简单问题,望各位大侠赐教:</P>
<P>1.在MapObject中如何取当前的地图范围,即 (minx,miny) 和(maxx,maxy)</P> <P>2.MapObject加载图层后就默认给每个图层赋予随机的颜色,请问如何修改?</P> |
|
1楼#
发布于:2004-08-02 10:13
<P>1、获取当前的范围的范围在例子里就有,你可以看看extent的帮助说明</P><P>2、设置symbol的样式就好,你也可以在例子里看到的</P><P> Dim oSymbol As MapObjects2.Symbol
Set oSymbol = Map1.Layers(0).Symbol MsgBox oSymbol.Color</P> |
|
|
2楼#
发布于:2005-06-03 10:53
<img src="images/post/smile/dvbbs/em01.gif" />
|
|
3楼#
发布于:2006-09-30 15:02
<P>自己回答吧:</P>
<P>1.在MapObject中如何取当前的地图范围,即 (minx,miny) 和(maxx,maxy)</P> <P>minx=map1.extent.left</P> <P>miny=map1.extent.top</P> <P>……</P> <P>2.MapObject加载图层后就默认给每个图层赋予随机的颜色,请问如何修改?</P> <P>Map1.Layers.Item("road").Symbol.Color=RGB(255,255,0)</P> |
|