C#实现拖拽控件边控，动态改变大小；

十四贝勒

已于 2024-04-10 08:44:30 修改

阅读量468

点赞数 4

文章标签： windows 服务器数据库

于 2024-03-29 17:23:38 首次发布

本文链接：https://blog.csdn.net/thanks_hck/article/details/137151746

版权

该代码展示了如何在WindowsForms中创建一个可调整大小的RichTextBox控件，通过重写WndProc方法实现鼠标点击位置的特殊处理，支持顶部、底部、左侧和右侧的边界缩放行为。

摘要由CSDN通过智能技术生成

public partial class ResizableRichTextBox : RichTextBox
{
public ResizableRichTextBox()
{
InitializeComponent();
}

public ResizableRichTextBox(IContainer container)
{
container.Add(this);

InitializeComponent();
}

[DllImport("user32.dll")]
private static extern int GetSystemMetrics(int nIndex);

private const int WM_NCHITTEST = 0x84;
private const int HTBOTTOM = 15;
private const int HTBOTTOMLEFT = 16;
private const int HTBOTTOMRIGHT = 17;
private const int HTTOP = 12;
private const int HTTOPLEFT = 13;
private const int HTTOPRIGHT = 14;
private const int HTLEFT = 10;
private const int HTRIGHT = 11;
private const int WM_EXPAND = WM_USER + 67;
private const int WM_USER = 0x0400;

protected override void WndProc(ref Message m)
{
base.WndProc(ref m);

switch (m.Msg)
{
case WM_NCHITTEST:
base.WndProc(ref m);
Point vPoint = new Point((int)m.LParam & 0xFFFF,
(int)m.LParam >> 16 & 0xFFFF);
vPoint = this.PointToClient(vPoint);
if (vPoint.X <= 5)
{
if (vPoint.Y <= 5)
m.Result = (IntPtr)HTTOPLEFT;
else if (vPoint.Y >= this.Height - 5)
m.Result = (IntPtr)HTBOTTOMLEFT;
else
m.Result = (IntPtr)HTLEFT;
}
else if (vPoint.X >= this.Width - 5)
{
if (vPoint.Y <= 5)
m.Result = (IntPtr)HTTOPRIGHT;
else if (vPoint.Y >= this.Height - 5)
m.Result = (IntPtr)HTBOTTOMRIGHT;
else
m.Result = (IntPtr)HTRIGHT;
}
else if (vPoint.Y <= 5)
m.Result = (IntPtr)HTTOP;
else if (vPoint.Y >= this.Height - 5)
m.Result = (IntPtr)HTBOTTOM;
break;
}
}