gis怎么改鼠标滚轮缩放_如何实现鼠标滚轮缩小和放大Picture box 里面绘制的图形...

本文介绍了如何在VB6中利用消息钩子和自定义窗口过程来实现GIS地图中鼠标滚轮的缩放功能。通过设置窗口过程,捕获WM_MOUSEWHEEL消息,根据滚轮上滚或下滚调整缩放比例,并调用显示方法更新视图。代码示例详细展示了整个实现过程。
摘要由CSDN通过智能技术生成

得分:20

ca56232b3bbedf9a539d07f37fffb99a.gif

3144d8b7615c79d9f638db40d5689d26.gif

a218af6549b45ee526caf607ebff1358.gif

0f8df0e29816ae721419de940fb833d1.gif

1、你要实现用键盘实现你说放的 实现 19s-41s 或者 21s-39s 的曲线,需要这个实现过程。

2、再把鼠标滚轮与这个操作 联结起来。

3、鼠标滚轮,VB6 是不直接支持的,需要 使用 消息勾子 来自定义处理 这个消息。

Option Explicit

'本函数是抄的网上的,再自己修改

Public Type POINTL

x   As Long

y   As Long

End Type

Declare Functio

压缩包里面有1.2和1.3两个版本,1.3较之1.2主要是快捷功能菜单项有所增加,另外个人感觉1.3滚轮缩放功能不如1.2流畅,还是推荐使用1.2版本。 程序exe文件放其他地方运行也行,不过程序所带的快捷功能菜单估计用不了~~~ exe文件会被杀软报木马病毒,添加信任列表即可。 -------------------- 这个软件主要是利用了MAPGIS本身的功能,以及一些快捷方式! 再利用键盘钩子,映射键盘到鼠标上。 再通过其它算法(可以不用,只不过会很憋拗)达到更好的效果! 并没有对MAPGIS本身做任何动!所以不会影响MAPGIS的稳定性! 使用过程中关闭本程序也不会有任何问题! (关闭后功能也就鼠标滚轮和快捷方式不能用而已) 当然程序启动后你也可以再打开一个MAPGIS编辑子系统窗口, 同样可以使用鼠标滚轮和快捷方式! -------------------- 软件使用说明: 鼠标滚轮:以鼠标光标为中心放大缩小 鼠标中键: 手形移动窗口 在绘图窗口敲 [Space]空格键 或者 双击[鼠标右键](1.3版本)打开快捷功能菜单 ---------以下的功能要在画线或弧段时才有效(以下实际上是MAPGIS本身的功能)--------- 按住[鼠标右键]单击[鼠标左键]:靠近线或弧段(不加点) ------新功能 按住[鼠标右键]单击[鼠标中键]:封闭线或弧段 ------新功能 按住[鼠标右键]向前推[鼠标滚轮]:锁定线或弧段的折点 ------新功能 按住[鼠标右键]向后拨[鼠标滚轮]:画线或画弧段时退点 ------新功能 [E]键 窗口中心跳到光标处 [5]数字键 更新窗口 [6]数字键 返回上级窗口 [R]键 画线或画弧段时退点 [W]键 调转线或弧段方向 [F]键 靠近线或弧段(加点) [D]键 靠近线或弧段(不加点) [S]键 锁定线或弧段的中点 [A]键 锁定线或弧段的头或尾 [Shift]键 锁定线或弧段的折点 [Ctrl]键 + [鼠标右键] 封闭线或弧段 [Ctrl]+[Enter]暂停或启动本程序
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值