Spread Windows Forms 13.0 Product Documentation
FarPoint.Win.Spread Assembly / FarPoint.Win.Spread Namespace / CellTouchStrip Class / CellTouchStrip Constructor
The spread.
Example


In This Topic
    CellTouchStrip Constructor
    In This Topic
    Creates a CellTouchStrip instance.
    Syntax
    'Declaration
     
    Public Function New( _
       ByVal spread As FpSpread _
    )
    'Usage
     
    Dim spread As FpSpread
     
    Dim instance As New CellTouchStrip(spread)
    public CellTouchStrip( 
       FpSpread spread
    )

    Parameters

    spread
    The spread.
    Example
    This example creates a touch strip.
    void autoFill_Click(object sender, EventArgs e)
            {
             FarPoint.Win.Spread.SpreadView activeView = fpSpread1.GetRootWorkbook().GetActiveWorkbook();
                if (activeView != null)
                {
                    activeView.ShowAutoFillIndicator();
                }
            }
    
    private void Form1_Load(object sender, EventArgs e)
        {
            fpSpread1.AllowDragFill = true;
        }
            private void fpSpread1_TouchStripOpening(object sender, FarPoint.Win.Spread.TouchStripOpeningEventArgs e)
            {
                e.Cancel = true;
                FarPoint.Win.Spread.CellTouchStrip touchStrip = new FarPoint.Win.Spread.CellTouchStrip(fpSpread1);
                ToolStripSeparator separator = new ToolStripSeparator();
                FarPoint.Win.Spread.TouchStripButton autoFill = new FarPoint.Win.Spread.TouchStripButton("AutoFill", System.Drawing.Image.FromFile("C:\\SpreadWin7\\dragfill.png") );
                autoFill.Click += autoFill_Click;
                touchStrip.Items.AddRange(new ToolStripItem[] { separator, autoFill });
                touchStrip.Show(new Point(e.X - 20, e.Y - 35 - touchStrip.Height));
            }
    Private Sub autoFill_Click(sender As Object, e As EventArgs)
                   Dim activeView As FarPoint.Win.Spread.SpreadView = fpSpread1.GetRootWorkbook().GetActiveWorkbook()
                   If activeView IsNot Nothing Then
                                  activeView.ShowAutoFillIndicator()
                   End If
    End Sub
    
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         FpSpread1.AllowDragFill = True
    End Sub
    Private Sub fpSpread1_TouchStripOpening(sender As Object, e As FarPoint.Win.Spread.TouchStripOpeningEventArgs)
                   e.Cancel = True
                   Dim touchStrip As New FarPoint.Win.Spread.CellTouchStrip(fpSpread1)
                   Dim separator As New ToolStripSeparator()
                   Dim autoFill As New FarPoint.Win.Spread.TouchStripButton("AutoFill", System.Drawing.Image.FromFile("C:\SpreadWin7\dragfill.png"))
                   AddHandler autoFill.Click, AddressOf autoFill_Click
                   touchStrip.Items.AddRange(New ToolStripItem() {separator, autoFill})
                   touchStrip.Show(New Point(e.X - 20, e.Y - 35 - touchStrip.Height))
    End Sub
    See Also