'Declaration Public ReadOnly Property NewSheetIndex As Integer
'Usage Dim instance As SheetDragMovedEventArgs Dim value As Integer value = instance.NewSheetIndex
public int NewSheetIndex {get;}
'Declaration Public ReadOnly Property NewSheetIndex As Integer
'Usage Dim instance As SheetDragMovedEventArgs Dim value As Integer value = instance.NewSheetIndex
public int NewSheetIndex {get;}
private void fpSpread1_SheetDragMoving(object sender, FarPoint.Win.Spread.SheetDragMovingEventArgs e) { if (e.ToSheetIndex == 3) { e.Cancel = true; //or e.Restrict = true; } } private void fpSpread1_SheetDragMoved(object sender, FarPoint.Win.Spread.SheetDragMovedEventArgs e) { listBox1.Items.Add("previous " + e.OldSheetIndex); listBox1.Items.Add("new " + e.NewSheetIndex); } private void Form1_Load(object sender, EventArgs e) { fpSpread1.Sheets.Count = 5; fpSpread1.AllowSheetMove = true; }
Private Sub fpSpread1_SheetDragMoved(sender As Object, e As FarPoint.Win.Spread.SheetDragMovedEventArgs) Handles fpSpread1.SheetDragMoved ListBox1.Items.Add("previous " & e.OldSheetIndex) ListBox1.Items.Add("new " & e.NewSheetIndex) End Sub Private Sub fpSpread1_SheetDragMoving(sender As Object, e As FarPoint.Win.Spread.SheetDragMovingEventArgs) Handles fpSpread1.SheetDragMoving If e.ToSheetIndex = 3 Then e.Cancel = True 'or e.Restrict = True End If End Sub Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load fpSpread1.Sheets.Count = 5 fpSpread1.AllowSheetMove = True End Sub