欢迎来到代码驿站!

.NET代码

当前位置:首页 > 软件编程 > .NET代码

WinForm实现鼠标拖动控件跟随效果

时间:2021-01-23 10:15:22|栏目:.NET代码|点击:

本文实例为大家分享了WinForm实现鼠标拖动控件跟随效果的具体代码,供大家参考,具体内容如下

1. 运行初始窗口如下:

2. 拖动后效果如下:

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;
    }
  }
}

上一篇:asp.net datalist绑定数据后可以上移下移实现示例

栏    目:.NET代码

下一篇:C#序列化成XML注意细节

本文标题:WinForm实现鼠标拖动控件跟随效果

本文地址:http://www.codeinn.net/misctech/49802.html

推荐教程

广告投放 | 联系我们 | 版权申明

重要申明:本站所有的文章、图片、评论等,均由网友发表或上传并维护或收集自网络,属个人行为,与本站立场无关。

如果侵犯了您的权利,请与我们联系,我们将在24小时内进行处理、任何非本站因素导致的法律后果,本站均不负任何责任。

联系QQ:914707363 | 邮箱:codeinn#126.com(#换成@)

Copyright © 2020 代码驿站 版权所有