[WIN]讓Panel對Mouse滾輪事件(Wheel)有感覺

讓Panel對Mouse滾輪事件(Wheel)有感覺

最近有看到朋友談到「panel 選軸捆動與 textbox 疑問」。

如果TextBox在Panel中的話,Focus在TextBox上,滑動Mouse滾輪的話,如果Panel有Scroll的話,是會跟著滑動的!

但是如果Focus所在的TextBox不在Panel之中,那Mouse在有Scroll的Panel上滑動Mouse滾輪,panel是不會理你的哦!

因為Panel預設是不會吃Focus的哦! 而且目前Focus是在Panel外面的TextBox上,不可以切換Focus過來!

那要如何做呢?

在網路上有找到解法「Mouse Wheel Event (C#)」,馬上記錄下來。

在Winform上放了一個Panel裡面放了一堆Button,並設定AutoScroll=True,再放一個TextBox在Panel外面,如下的畫面,

image

 

而程式中作法如下,

1.您的form要實作 IMessageFilter

2.加入PreFilterMessage method

3.在Form的建構函式中加入Application.AddMessageFilter(this);

Code如下,


using System;
using System.Drawing;
using System.Runtime.InteropServices;
using System.Windows.Forms;

namespace WindowsFormsApplication2
{
    public partial class Form1 : Form, IMessageFilter
    {
        // P/Invoke declarations
        [DllImport("user32.dll")]
        private static extern IntPtr WindowFromPoint(Point pt);

        [DllImport("user32.dll")]
        private static extern IntPtr SendMessage(IntPtr hWnd, int msg, IntPtr wp, IntPtr lp);

        public Form1()
        {
            InitializeComponent();
            Application.AddMessageFilter(this);
        }

        public bool PreFilterMessage(ref Message m)
        {
            if (m.Msg == 0x20a)
            {
                // WM_MOUSEWHEEL, find the control at screen position m.LParam
                Point pos = new Point(m.LParam.ToInt32() & 0xffff, m.LParam.ToInt32() >> 16);
                IntPtr hWnd = WindowFromPoint(pos);
                if (hWnd != IntPtr.Zero && hWnd != m.HWnd && Control.FromHandle(hWnd) != null)
                {
                    SendMessage(hWnd, m.Msg, m.WParam, m.LParam);
                    return true;
                }
            }
            return false;
        }
    }
}

 

有AutoScroll屬性的Container控制項,應該都是有效的哦!

Hi, 

亂馬客Blog已移到了 「亂馬客​ : Re:從零開始的軟體開發生活

請大家繼續支持 ^_^