-
本版专家分：9501结帖率 100% -
1、怎么响应鼠标上的滑轮滚动的消息？
2、运行时错误“OutOfResource”是不是指内存溢出？在出这个错误时，系统同时会提示“参数错误”，然后屏幕上许多区域都变成了白色。但是当程序退出后，系统显示又恢复正常。
-
本版专家分：25076
-
- 进士 2001年 总版技术专家分年内排行榜第五
-
-
微软MVP
2005年9月 荣获微软MVP称号
2008年10月 荣获微软MVP称号
2007年10月 荣获微软MVP称号
2006年10月 荣获微软MVP称号
2004年9月 荣获微软MVP称号
2003年9月 荣获微软MVP称号
2002年9月 荣获微软MVP称号
-
-
红花
2005年7月 VB大版内专家分月排行榜第一
2005年6月 VB大版内专家分月排行榜第一
2001年5月 VB大版内专家分月排行榜第一
2001年4月 VB大版内专家分月排行榜第一
2001年3月 VB大版内专家分月排行榜第一
-
-
黄花
2005年9月 VB大版内专家分月排行榜第二
2001年2月 VB大版内专家分月排行榜第二
-
-
1、Delphi有一些组件有OnMouseWhell事件，例如TMemo。如果你的控件不是从这里继承的
可以自己写消息处理函数，消息是WM_MOUSEWHEEL
-
本版专家分：450 -
TWincontrol.OnMouseWheel可以响应滑轮消息,但一般用不着,因为每一个TWincontrol缺省地把消息发给主窗口,你只要编写主窗口的OnMouseWheel就可以了.但要注意,有时候你的鼠标点击了非TWincontrol元件,你需要找到一个TWincontrol执行SetFocus.
-
本版专家分：9501
-
我在Windows SDK帮助中找到了这个消息,但是被注明只在Windows NT下支持,我也觉得很奇怪,98下的Notepad明明能够相应这个消息的.
第二个问题我找到了答案,因为我在使用区域的时候采用了以下的方法
DeleteObject(SelectClipRgn(Canvas.Handle,CreateRectRgn(....)));
根据WindowsAPI的用法应该没错，但是我使用的时候就肯定出错。估计是DeleteObject没有起到作用。后来我使用了一个临时变量来管理Rgn就没有问题了。
谢谢两位的回答