FarPoint.Win.Spread Assembly > FarPoint.Win.Spread Namespace > SheetDragMovedEventArgs Class : OldSheetIndex Property |
'Declaration Public ReadOnly Property OldSheetIndex As Integer
'Usage Dim instance As SheetDragMovedEventArgs Dim value As Integer value = instance.OldSheetIndex
public int OldSheetIndex {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
Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows Server 2012 R2, Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8, Windows 8.1, Windows 10