阅读:2095回复:9
mo查询显示问题
<P>要查询的图层是polygon,其上有一层注记层。</P>
<P>我查询的时候,将满足条件的记录集用drawshape函数选择特定的symbol重绘,这样一来,我就将注记层覆盖了。symbol的type更换成透明或其它类型,效果都不太好。我希望重绘后,仍能将注记显示在最上方,大家有好办法吗?</P> |
|
1楼#
发布于:2005-01-25 18:05
可以添加 Event 来实现。
|
|
|
2楼#
发布于:2005-01-26 02:48
<img src="http://www.gisempire.com/bbs/Skins/Default/emot/em01.gif">
|
|
3楼#
发布于:2005-01-26 10:45
我也很想知道。
用event的意思是说不用drawshape来画符号。而是用addevent么?? <img src="images/post/smile/dvbbs/em02.gif" /><img src="images/post/smile/dvbbs/em02.gif" /> |
|
4楼#
发布于:2005-01-26 11:22
Private Sub Map1_AfterLayerDraw(ByVal index As Integer, ByVal canceled As Boolean, ByVal hDC As stdole.OLE_HANDLE)
' If sbl = True Then ' If Not recs3_1.EOF Then ' Map1.DrawShape recs3_1, F_symbol ' End If ' End If End Sub '****************************************************** '**********在trackinglayer层中添加符号****************** '****************************************************** Private Sub Map1_AfterTrackingLayerDraw(ByVal hDC As stdole.OLE_HANDLE) If sbl = True Then If Not recs3_1.EOF Then Map1.TrackingLayer.AddEvent recs3_1, 0 End If End If End Sub 我原先用第一端程序来实现 因为不能去掉,所以用了第二端程序 可是第二段程序却有错。 |
|
5楼#
发布于:2005-01-26 16:53
<P>你的第二段程序应改为</P><P>Map1.TrackingLayer.AddEvent recs3_1("shape").value, 0</P><P>因为recordset本身只是数据记录。</P>
|
|
|
6楼#
发布于:2005-01-27 17:49
嗯。成功了。!!谢谢!!!<img src="images/post/smile/dvbbs/em04.gif" /><img src="images/post/smile/dvbbs/em04.gif" /><img src="images/post/smile/dvbbs/em04.gif" />
|
|
7楼#
发布于:2005-06-06 10:35
<img src="images/post/smile/dvbbs/em05.gif" />
|
|
8楼#
发布于:2005-06-07 08:56
<img src="images/post/smile/dvbbs/em01.gif" /><img src="images/post/smile/dvbbs/em01.gif" />
|
|
|
9楼#
发布于:2005-06-07 14:36
<img src="images/post/smile/dvbbs/em02.gif" />
|
|