前往小程序,Get更优阅读体验!
立即前往
首页
学习
活动
专区
工具
TVP
发布
社区首页 >专栏 >WinForm 实现鼠标拖动控件跟随效果(图文)

WinForm 实现鼠标拖动控件跟随效果(图文)

作者头像
vv彭
发布2021-01-18 10:14:28
2K0
发布2021-01-18 10:14:28
举报

1. 运行初始窗口如下:

image
image

2. 拖动后效果如下:

image
image

3. 代码如下:


public partial class Form1 : Form
{
    /*
     * 理解了下面的几个概念,就能完全明白相对坐标的变化.
     * MouseEventArgs e 为事件鼠标参数,因此,e.Location 指示了位于事件源上的光标坐标
     * Cursor.Position 获取的是相对于用户屏幕的光标坐标
     * PointToClient() 方法可将屏幕坐标 Cursor.Position 换算成工作区的坐标
     * 因此,换算后的 Cursor.Position 减去 e.Location 得到的始终是事件源的 Location
    */

    /// <summary>
    /// 鼠标按下为true
    /// </summary>
    private bool Mousedown;

    /// <summary>
    /// 鼠标在事件源的位置
    /// </summary>
    private int CurX = 0;
    private int CurY = 0;

    public Form1()
    {
        InitializeComponent();
    }

    private void Controls_MouseDown(object sender, MouseEventArgs e)
    {
        CurX = e.X;
        CurY = e.Y;
        Mousedown = true;
        if (sender is TextBox)
        {
            ((TextBox)sender).Cursor = Cursors.Arrow;
        }
    }

    private void Controls_MouseMove(object sender, MouseEventArgs e)
    {
        if (Mousedown)
        {
            // 获取当前屏幕的光标坐标
              Point pTemp = new Point(Cursor.Position.X, Cursor.Position.Y);
            // 转换成工作区坐标
              pTemp = this.PointToClient(pTemp);
            // 定位事件源的 Location
            Control control = sender as Control;
            control.Location = new Point(pTemp.X - CurX, pTemp.Y - CurY);                
        }
    }

    private void Controls_MouseUp(object sender, MouseEventArgs e)
    {
        Mousedown = false;
        if (sender is TextBox)
        {
            ((TextBox)sender).Cursor = Cursors.IBeam;
        }
    }
}
本文参与 腾讯云自媒体分享计划,分享自作者个人站点/博客。
原始发表:2011-12-20 ,如有侵权请联系 cloudcommunity@tencent.com 删除

本文分享自 作者个人站点/博客 前往查看

如有侵权,请联系 cloudcommunity@tencent.com 删除。

本文参与 腾讯云自媒体分享计划  ,欢迎热爱写作的你一起参与!

评论
登录后参与评论
0 条评论
热度
最新
推荐阅读
领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档