用鼠标中键自动滚屏

pino 2000-09-03 03:32:00
在“写字板”和“记事本”中,按下鼠标中键,鼠标就会变成双箭头,移动鼠标就能自动滚动文本,我该怎样来实现?是不是有什么扩展的鼠标消息?
用 VB6 做的程序好像不需要特别处理就会自动支持,但是在Delphi中的Tmemo、Trichedit却都不支持,要等 Delphi 6 吗?
...全文
471 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
robyman 2001-11-09
  • 打赏
  • 举报
回复
我要,谢谢
qiuzhiman@263.net
andygood 2000-09-15
  • 打赏
  • 举报
回复

This problem is too easy le!

When the user pushes the middle button in your client area, Windows will send a WM_MBUTTONDOWN message, similar as WM_LBUTTONDOWN too u. You can overload it to implement your action. When the middle button is moving(let's just say so), u will receive a WM_MOUSEWHEEL message. You can process this message just as you process WM_VSCROLL, but is easier.

By the way, if u want to have some special cursor, u'll have to use standard LoadCursor(From your own resource) and SetCursor API, according to the mouse action.

Why the default window does not implement this is because that it is imposible to know your scroll limit. You can provide your own class(which use virtual functions) to have the default process.
netsong 2000-09-15
  • 打赏
  • 举报
回复
我要,谢谢。
netsongs@etang.com
andygood 2000-09-15
  • 打赏
  • 举报
回复

谁需要了我Email给他。
pino 2000-09-15
  • 打赏
  • 举报
回复
我又重新做了一下试验,纠正一个错误
实际上 TMemo,TListBox,TComboBox 都支持中键自动滚屏,该功能由系统完成,
而 TRichEdit 确实不支持,实际上是系统不支持,看来只有自己编写滚屏部分了。

最后再问一个问题,谁知道滚屏的光标在那个系统文件里面?就是那个几个箭头!
有人答了马上分点数
pino 2000-09-14
  • 打赏
  • 举报
回复
加分了!现在是180
pino 2000-09-14
  • 打赏
  • 举报
回复
加分了!现在是不是180
pino 2000-09-07
  • 打赏
  • 举报
回复
补充一点,Tlistbox 却支持中键滚屏,奇怪,是不是在继承时有消息被过滤掉了?
HF 2000-09-07
  • 打赏
  • 举报
回复
关注!
pandaxj 2000-09-03
  • 打赏
  • 举报
回复
还有我!
zhyy 2000-09-03
  • 打赏
  • 举报
回复
关注!
Foxit Reader(福昕阅读器)是一款免费的PDF文档阅读器和打印器,具有令人难以置信的小巧体积、快捷的启动速度和丰富的功能。新发布的3.0版本支持Windows Me/2000/XP/2003/Vista操作系统,其核心技术与PDF标准版1.7完全兼容。 新增的功能: • 多媒体设计功能: Foxit Reader 3.0不仅支持媒体播放,使用Movie Tool和Sound Tool工具还可以对多媒体文件进行增加、删除、修改等操作。 • 附件列表面板: 该面板可以将PDF文档中嵌入的所有附件都在一个列表中显示出来,并为用户提供了多种选择来管理这些附件。例如打开、删除以及增加对附件的解释说明。当打开附件时,可以设置更改安全属性。 • 页面缩略图面板: 该面板可显示出每一页PDF页面的缩略图,帮助用户快速浏览PDF文档。 • 层面板: 层面板列出了文档中所有PDF层,用户可通过该面板可控制显示或隐藏某个层。 • 公制单位的支持: Foxit Reader3.0已经实现对公制单位(米、厘米)的支持,用户可在页面尺寸、打印等参数设置时选择米、厘米代替英寸。 • 鼠标中键自动滚屏: 在Hand Tool阅读模式下,按下鼠标中键可进行自动滚屏。 • 福昕在线内容管理系统: 用户可通过福昕在线内容管理系统组织、收集、共享文件和表单,用户可从Foxit Reader或本机上自行上传各类文件,并可以在线交流、共享、修订文件,建立群组聊天室。 • 自动滚屏: 无需借用鼠标或键盘方向键即可实现自动滚屏浏览功能。 • 支持Firefox浏览器: 完善的Firefox插件,帮助用户使用火狐浏览器对PDF文件进行阅读或编辑。 增强的功能: • 改进的文本选择工具: 改进后的文本选择工具不但可以进行文本选择,还可自由添加多种类型的注释,包括高亮、删除线、下划线、曲线、替换等等。 • 更加完善的打印设置: 支持跨页独立打印,例如打印页码1、3、7-10;当指定的打印份数过多时,会出现提醒。 • 更加完美的标注控制: 在PDF页面上可对标注进行居中对齐调整:水平居中、垂直居中、水平垂直居中等。这些标注包括各种不同类型的标注,包括附注、图形标注、打字机标注等。 • 全新的工具栏体验: 对工具栏全面调整,显示全新的工具栏布局,并增加了定制工具栏功能。 • 改进的权限控制: 在受保护PDF文件中,一些相关的工具将显示灰色,不能使用。 • 改进的升级模式: 最新的升级对话框设置中,允许用户自由设定更新频率,福昕阅读器(Foxit Reader)支持每周或每月自动更新。 • 全新的Pop-up窗口体验: 改进后的Pop-up标注窗口更加美观,可将窗口透明化,并可支持复制、剪切、粘贴文本。 • 改进的快捷键设置: 阅读时按下F11可以切换全屏模式,使用键盘快捷键可以轻松填写表单。 • 可移植的偏好设置: Foxit Reader 3.0中增加了一个.INI文件,用于保存用户的个人设置,并可进行转移。用户可根据自己的喜好进行各种参数设置,并且不用担心程序更新或者转移后数据丢失。 • BUG修复

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧