滚动富文本框
本文关键字:文本 滚动 | 更新日期: 2023-09-27 18:35:49
我想控制RichTextBox滚动,但在控件中找不到任何方法来执行此操作。
这样做的原因是我希望鼠标光标在 RichTextBox 控件上时鼠标滚轮滚动有效(它没有活动焦点:鼠标滚轮事件由窗体处理)。
任何帮助不胜感激!
win32
有点简单。给你:
//must add using System.Reflection
public partial class Form1 : Form, IMessageFilter
{
bool hovered;
MethodInfo wndProc;
public Form1()
{
InitializeComponent();
Application.AddMessageFilter(this);
richTextBox1.MouseEnter += (s, e) => { hovered = true; };
richTextBox1.MouseLeave += (s, e) => { hovered = false; };
wndProc = typeof(Control).GetMethod("WndProc", BindingFlags.NonPublic |
BindingFlags.Instance);
}
public bool PreFilterMessage(ref Message m)
{
if (m.Msg == 0x20a && hovered) //WM_MOUSEWHEEL = 0x20a
{
Message msg = Message.Create(richTextBox1.Handle, m.Msg, m.WParam, m.LParam);
wndProc.Invoke(richTextBox1, new object[] { msg });
}
return false;
}
}
注意:我使用IMessageFilter
在application-level
捕获WM_MOUSEWHEEL
消息。我也用Reflection
来调用受保护的方法WndProc
处理消息WM_MOUSEWHEEL
,你总是可以使用SendMessage
win32函数将WM_MOUSEWHEEL
发送到richTextBox1
,但这里需要declaration
导入。这取决于你。