如何从一个面板拖放(复制)到另一个面板

本文关键字：拖放 复制 另一个 一个 | 更新日期: 2023-09-27 18:10:32

在一个表单上有两个面板。
一个面板有一些控件，如按钮或图像，第二个面板是空的。我想从面板1中拖动一个控件并将其拖放到面板2中，但它应该创建一个control的副本，并且在拖动时应该显示与控件相同大小的矩形当在面板2中拖动时，拖动的形状应该出现在鼠标位置
我想创建一个类似模拟器的东西。在面板1中有一些工具，当有人在面板2上拖放工具时，它应该出现在鼠标位置。

语言无关，可能是C#或VB.NET

如何从一个面板拖放(复制)到另一个面板

你试过这样做吗?

private void Form5_Load(object sender, EventArgs e)  
{  
    this.panel1.AllowDrop = true;  
    foreach (Control c in this.panel1.Controls)  
    {  
        c.MouseDown += new MouseEventHandler(c_MouseDown);  
    }  
    this.panel1.DragOver += new DragEventHandler(panel1_DragOver);  
    this.panel1.DragDrop += new DragEventHandler(panel1_DragDrop);  
}  
void c_MouseDown(object sender, MouseEventArgs e)  
{  
    Control c = sender as Control;  
    c.DoDragDrop(c, DragDropEffects.Move);  
}  
void panel1_DragDrop(object sender, DragEventArgs e)  
{  
    Control c = e.Data.GetData(e.Data.GetFormats()[0]) as Control;  
    if (c != null)  
    {  
        c.Location = this.panel1.PointToClient(new Point(e.X, e.Y));  
        this.panel1.Controls.Add(c);  
    }  
}  
void panel1_DragOver(object sender, DragEventArgs e)  
{  
    e.Effect = DragDropEffects.Move;  
}

VB。净

Private Sub Form5_Load(sender As Object, e As EventArgs)
    Me.panel1.AllowDrop = True
    For Each c As Control In Me.panel1.Controls
        c.MouseDown += New MouseEventHandler(AddressOf c_MouseDown)
    Next
    Me.panel1.DragOver += New DragEventHandler(AddressOf panel1_DragOver)
    Me.panel1.DragDrop += New DragEventHandler(AddressOf panel1_DragDrop)
End Sub
Private Sub c_MouseDown(sender As Object, e As MouseEventArgs)
    Dim c As Control = TryCast(sender, Control)
    c.DoDragDrop(c, DragDropEffects.Move)
End Sub
Private Sub panel1_DragDrop(sender As Object, e As DragEventArgs)
    Dim c As Control = TryCast(e.Data.GetData(e.Data.GetFormats()(0)), Control)
    If c IsNot Nothing Then
        c.Location = Me.panel1.PointToClient(New Point(e.X, e.Y))
        Me.panel1.Controls.Add(c)
    End If
End Sub
Private Sub panel1_DragOver(sender As Object, e As DragEventArgs)
    e.Effect = DragDropEffects.Move
End Sub
源

我正在修改@Shim的一些代码。下面是更新后的代码，其中控件的副本将放置在另一个面板

中
Random rnd = new Random();
private void Form5_Load(object sender, EventArgs e)  
{  
    this.panel1.AllowDrop = true;  
    foreach (Control c in this.panel1.Controls)  
    {  
        c.MouseDown += new MouseEventHandler(c_MouseDown);  
    }  
    this.panel1.DragOver += new DragEventHandler(panel1_DragOver);  
    this.panel1.DragDrop += new DragEventHandler(panel1_DragDrop);  
}  
void c_MouseDown(object sender, MouseEventArgs e)  
{  
    Control c = sender as Control;  
    c.DoDragDrop(c, DragDropEffects.Move);  
}  
void panel1_DragDrop(object sender, DragEventArgs e)  
{  
    Control c = e.Data.GetData(e.Data.GetFormats()[0]) as Control;
    // Here, you get a copy of your drag drop button and dynamically new button is created  
    Button btn = new Button();
    btn.Name = "Button" + rnd.Next();
    btn.Size = c.Size;
    if (c != null)  
    {  
        // Add the newly created button to you Panel
        btn.Location = this.panel1.PointToClient(new Point(e.X, e.Y));  
        this.panel1.Controls.Add(btn);  
    }  
}  
void panel1_DragOver(object sender, DragEventArgs e)  
{  
    e.Effect = DragDropEffects.Move;  
}

此解决方案将在移动鼠标时拖动按钮(或任何其他选定的组件)并将其放置在您放置它的位置

private SimpleButton selectedButton;
    public Form1()
    {
        InitializeComponent();
    }
    private void Form1_Load(object sender, EventArgs e)
    {
        xtraScrollableControl2.AllowDrop = true;
        xtraScrollableControl2.DragEnter += XtraScrollableControl_DragEnter;
        xtraScrollableControl2.DragDrop += XtraScrollableControl_DragDrop;
        xtraScrollableControl2.DragOver += XtraScrollableControl_DragOver;
    }
    private void XtraScrollableControl_DragEnter(object sender, DragEventArgs e)
    {
        e.Effect = e.Data.GetDataPresent(typeof(Bitmap)) ? DragDropEffects.Copy : DragDropEffects.None;
    }
    private void XtraScrollableControl_DragDrop(object sender, DragEventArgs e)
    {
        var simpleButton = e.Data.GetData(e.Data.GetFormats()[0]) as SimpleButton;
        if (simpleButton == null) return;
        if (simpleButton.Parent != sender) 
        {
            var btn = new SimpleButton
            {
                Dock = DockStyle.None,
                Size = new Size(125, 50),
                Text = simpleButton.Text,
                Location = ((XtraScrollableControl) sender).PointToClient(new Point(e.X, e.Y)),
                ImageList = simpleButton.ImageList, 
                ImageIndex = simpleButton.ImageIndex,
                ImageLocation = simpleButton.ImageLocation,
                Parent = ((XtraScrollableControl)sender)
            };
            btn.MouseDown += simpleButton_MouseDown;
            ((XtraScrollableControl)sender).Controls.Add(btn);
        }
        else
        {
            ((XtraScrollableControl)sender).Controls.Remove(simpleButton);
            simpleButton.Location = ((XtraScrollableControl)sender).PointToClient(new Point(e.X, e.Y));
            ((XtraScrollableControl)sender).Controls.Add(simpleButton);
        }
        selectedButton = null;
    }
    private void XtraScrollableControl_DragOver(object sender, DragEventArgs e)
    {
        e.Effect = DragDropEffects.Copy;
        selectedButton.Location = ((XtraScrollableControl)sender).PointToClient(new Point(e.X, e.Y));
    }
    private void simpleButton_MouseDown(object sender, MouseEventArgs e)
    {
        var btn = sender as SimpleButton;
        if (btn == null) return;
        selectedButton = btn;
        btn.DoDragDrop(btn, DragDropEffects.Copy);
    }

希望这对一些人有帮助

我使用DevExpress组件但是对于标准的

<>之前 DevExpress XtraScrollableControlSimpleButton微软面板按钮
相关文章：