滚动RichTextBox

Question

我想控制 RichTextBox 滚动但无法在控件中找到任何执行此操作的方法。

这样做的原因是当鼠标光标位于 RichTextBox 控件上时（我没有活动焦点：鼠标滚轮事件由表单处理），我希望鼠标滚轮滚动有效）。

感谢任何帮助！

Answer 1

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来抓住WM_MOUSEWHEEL上的application-level消息。我还使用Reflection来调用受保护的方法WndProc来处理消息WM_MOUSEWHEEL，您始终可以使用SendMessage win32函数将WM_MOUSEWHEEL发送到{ {1}}相反，但这需要richTextBox1导入。这取决于你。