Spread Windows Forms 13.0 Product Documentation
FarPoint.Win.Spread Assembly / FarPoint.Win.Spread Namespace / FpSpread Class / AllowDragDrop Property
Example


In This Topic
    AllowDragDrop Property (FpSpread)
    In This Topic
    Gets or sets whether to allow the user to drag-and-drop a range of cells in the component.
    Syntax
    'Declaration
     
    Public Property AllowDragDrop As Boolean
    'Usage
     
    Dim instance As FpSpread
    Dim value As Boolean
     
    instance.AllowDragDrop = value
     
    value = instance.AllowDragDrop
    public bool AllowDragDrop {get; set;}

    Property Value

    Boolean: true to allow the user to drag and drop data; false otherwise
    Remarks
    The AllowDragDrop property is not supported with grouping.
    Example
    This example specifies whether to allow the user to drag-and-drop a range of cells.
    FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread();
    FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView();
    DialogResult dlg;
    fpSpread1.Location = new Point(10, 10);
    fpSpread1.Height = 200;
    fpSpread1.Width = 400;
    Controls.Add(fpSpread1);
    fpSpread1.Sheets.Add(shv);
    fpSpread1.ActiveSheet.SetValue(0, 0, "Drag");
    fpSpread1.ActiveSheet.SetValue(1, 0, "And");
    fpSpread1.ActiveSheet.SetValue(2, 0, "Drop");
    dlg = MessageBox.Show("If you want to Drag/Drop click the YES button, place the pointer on the edge of the selection, and
    then drag and drop.", "DragDrop", MessageBoxButtons.YesNo);
    if (dlg == DialogResult.Yes)
    {
         fpSpread1.ActiveSheet.AddSelection(0, 0, 3, 1);
         fpSpread1.AllowDragDrop = true;
    }
    Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread()
    Dim shv As New FarPoint.Win.Spread.SheetView()
    Dim dlg As DialogResult
    fpSpread1.Location = New Point(10, 10)
    fpSpread1.Height = 200
    fpSpread1.Width = 400
    Controls.Add(fpSpread1)
    fpSpread1.Sheets.Add(shv)
    fpSpread1.ActiveSheet.SetValue(0, 0, "Drag")
    fpSpread1.ActiveSheet.SetValue(1, 0, "And")
    fpSpread1.ActiveSheet.SetValue(2, 0, "Drop")
    dlg = MessageBox.Show("If you want to Drag/Drop click the YES button, place the pointer on the edge of the selection, and
    then drag and drop.", "DragDrop", MessageBoxButtons.YesNo)
    If dlg = DialogResult.Yes Then
         fpSpread1.ActiveSheet.AddSelection(0, 0, 3, 1)
         fpSpread1.AllowDragDrop = True
    End If
    See Also