mapx实现热点效果
Private Sub Map1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
'StatusBar1.Panels(1).Text = X & "," & Y
Dim Lon As Double
Dim lat As Double
Dim fs As Features
Dim pnt As New Point
Dim lb As MapXLib.Label '±ê×¢¶ÔÏó
Map1.ConvertCoord x, y, Lon, lat, miScreenToMap
pnt.Set Lon, lat
Set fs = Map1.Layers(PLayer).SearchAtPoint(pnt)
If fs.Count > 0 Then '¶¨Î»¶ÔÏó
If Not curftr Is Nothing Then If curftr = fs.Item(1) Then Exit Sub '·ÀÖ¹Öظ´ÉèÖÃ
Set lb = GetLabel(fs.Item(1).FeatureKey, Map1.Layers(PLayer).Labels)
If Not lb Is Nothing Then 'Ϊ±ê×¢¼ÓÏ»®ÏßЧ¹û
lb.Style.TextFont.Underline = True
Set curftr = fs.Item(1)
'fs.Item(1).Update
End If
Map1.MousePointer = miCustomCursor 'Êó±êÑùʽ
Else
If Not curftr Is Nothing Then '»¹ÔÏ»®Ïß״̬
Set lb = GetLabel(curftr.FeatureKey, Map1.Layers(PLayer).Labels)
lb.Style.TextFont.Underline = False
'curftr.Update
Set curftr = Nothing
Frame1.Visible = False 'Òþ²Øµ¯³ö²Ëµ¥
End If
Map1.MousePointer = miArrowCursor
End If
End Sub
mapx实现热点效果相关推荐
- 【MFC】工具栏按钮的热点效果
00. 目录 文章目录 00. 目录 01. 案例概述 02. 开发环境 03. 关键技术 04. 程序设计 05. 秘笈心法 06. 源码下载 07. 附录 01. 案例概述 工具栏按钮的热点效果可 ...
- 论追热点,我不是针对谁,我是说在座的各位......
作者:学运营就来 运营小咖秀 作为一名运营人,估计有两个字是我们最熟悉不过的----"热点".写文章没角度时,多么希望来个热点蹭一蹭:在放假休息时,又多么希望不要出现热点.为了追热 ...
- Three.js实现汽车3D展示/开关门/变色/运动/视角切换/波动热点/汽车模型
1,介绍 该示例使用Three.js库 r141版本. 主要实现功能:使用Three.js实现引入汽车模型,汽车3D展示,开门关门动画,运动,变色,视角切换,显示波动热点标签. 效果图如下: 参考案例 ...
- 全景丨0基础学习VR全景制作,平台篇第15章:热点功能-音图文
大家好,欢迎观看蛙色VR官方--后台使用系列课程! 功能说明 应用场景 热点,指在全景作品中添加各种类型图标的按钮,引导用户通过按钮产生更多的交互,增加用户的多元化体验. 音图文热点,即音频.图片.文 ...
- 树莓派连接手机热点,并设置静态IP
网上关于设置静态IP的方法很多,亲测,有一种贼坑,搞不好会让那些没有屏幕的玩家要重刷系统,因为那种方法设置wifi后,不仅无法连接上wifi,连原来的有线网也无法使用 如果有人已经掉坑,这里有一个建议 ...
- MFC对话框中的工具栏、状态栏设计小结
对网上的资料结合自己的实践的总结,由于大部分都是网上先辈们的经验,这里只是直接将内容拿来,格式优化一下更易读而已. 对话框中建立工具栏的方法 工具栏中包含了一组用于执行命令的按钮,每个按钮都用一个图标 ...
- 【C++】C/C++系列教程汇总(更新中......)
文章目录 01. C语言基础 02. C开发实战 03. 数据结构 04. C++语言基础 05. C++核心编程 06. C++开发实战 07. MFC 08. QT 09. Visual Stud ...
- 关于Mongodb的全面总结
MongoDB的内部构造<MongoDB The Definitive Guide> MongoDB的官方文档基本是how to do的介绍,而关于how it worked却少之又少,本 ...
- VC++开发垃圾文件清理软件之三:程序的界面设计与实现----对话框界面
先说下哈,有人说要源代码,源代码在博文<VC++开发垃圾文件清理软件之四:程序的界面设计与实现----按钮控件界面>的最后给出下载地址供大家下载. 对应用程序界面的设计包括两部分,一部分是 ...
最新文章
- datatable自动增加序号
- 9步教你用NumPy从头开始构建神经网络!
- comlx 牌计算机音乐怎么设置,最具性价比的全能型 MIDI 键盘:Nektar Impact LX+ 键盘视频教程...
- Laravel大型项目系列教程(二)之用户管理
- Android中弹出对话框,AlertDialog关键代码
- Extjs 中的cookie设置
- js与python 抓包_Python爬虫学习,记一次抓包获取js,从js函数中取数据的过程
- Webpack 实现 Tree shaking 的前世今生
- 加密算法使用(五):RSA使用全过程
- [Yii Framework] Another method to run cron in the share space server.
- java之模块学习-接口回调机制详解
- 矩阵减法c语言程序,矩阵的加减法
- html魔方转动效果,简单说 用CSS做一个魔方旋转的效果
- 域名如映射为 IP: 端口
- 2022暑期杭电第八场
- 极验点选验证码位置识别(一):点选验证码位置识别技术总览
- 高颜值!广西730分学霸杨晨煜被清华智班录取,学习人工智能,网友纷纷求开微博!
- 学习笔记1—元胞自动机(CA)模型①
- nrf52832 sdk15.2.0 dfu升级攻略
- php的行情,PHP股票接口如何获取行情
热门文章
- 用tigervnc远程控制centos x64 6.2
- 《数字逻辑设计与计算机组成》一3.3 加法器
- Map存值问题的研究
- .net实现md5加密 sha1加密 sha256加密 sha384加密 sha512加密 des加密解密
- 用 eclipse SVN 插件共享项目
- [AsyncHandle]什么引发了ObjectDisposedException?
- 比买电脑还便宜的桌面虚拟化方案
- MyBatis 3 自动生成 主键 针对不同的数据库(oracle/sqlserver/mysql)
- 小程序工程化实践(上篇)-- 手把手教你撸一个小程序 webpack 插件,一个例子带你熟悉 webpack 工作流程...
- 大开源时代,“仁慈的独裁者”管理模式还走得通吗?