滚动富文本框

本文关键字:文本 滚动 | 更新日期: 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;
    }
}

注意:我使用IMessageFilterapplication-level捕获WM_MOUSEWHEEL消息。我也用Reflection来调用受保护的方法WndProc处理消息WM_MOUSEWHEEL,你总是可以使用SendMessage win32函数将WM_MOUSEWHEEL发送到richTextBox1,但这里需要declaration导入。这取决于你。