FarPoint.Web.Spread Assembly > FarPoint.Web.Spread Namespace > ButtonCellType Class > ButtonCellType Constructor : ButtonCellType Constructor(String,ButtonType,String) |
'Declaration Public Function New( _ ByVal cmd As String, _ ByVal type As ButtonType, _ ByVal urlOrText As String _ )
'Usage Dim cmd As String Dim type As ButtonType Dim urlOrText As String Dim instance As New ButtonCellType(cmd, type, urlOrText)
FpSpread1.Sheets[0].ColumnCount=7; FpSpread1.Sheets[0].RowCount=50; FarPoint.Web.Spread.ButtonCellType btn=new FarPoint.Web.Spread.ButtonCellType("MyRed",ButtonType.PushButton,"Red"); FarPoint.Web.Spread.ButtonCellType btn1=new FarPoint.Web.Spread.ButtonCellType("MyBlue",ButtonType.PushButton,"Blue"); FarPoint.Web.Spread.StyleInfo style=new FarPoint.Web.Spread.StyleInfo(); FarPoint.Web.Spread.StyleInfo style1=new FarPoint.Web.Spread.StyleInfo(); style.CellType=btn; style1.CellType=btn1; FpSpread1.Sheets[0].SetStyleInfo(-1,0,style); FpSpread1.Sheets[0].SetStyleInfo(-1,1,style1); private void FpSpread1_ButtonCommand(object sender,FarPoint.Web.Spread.SpreadCommandEventArgs e) { if(e.CommandName=="MyRed") { FpSpread1.Sheets[0].BackColor=Color.Red; } elseif(e.CommandName=="MyBlue") { FpSpread1.Sheets[0].BackColor=Color.Blue; } }
Dim btn As New FarPoint.Web.Spread.ButtonCellType("MyRed",ButtonType.PushButton,"Red") Dim btn1 As New FarPoint.Web.Spread.ButtonCellType("MyBlue",ButtonType.PushButton,"Blue") Dim style As New FarPoint.Web.Spread.StyleInfo() Dim style1 As New FarPoint.Web.Spread.StyleInfo() FpSpread1.Sheets(0).ColumnCount=7 FpSpread1.Sheets(0).RowCount=50 style.CellType=btn style1.CellType=btn1 FpSpread1.Sheets(0).SetStyleInfo(-1,0,style) FpSpread1.Sheets(0).SetStyleInfo(-1,1,style1) Private Sub FpSpread1_ButtonCommand(ByVal sender As Object,ByVal e As FarPoint.Web.Spread.SpreadCommandEventArgs)Handles FpSpread1.ButtonCommand If e.CommandName="MyRed" Then FpSpread1.Sheets(0).BackColor=Color.Red ElseIf e.CommandName="MyBlue" Then FpSpread1.Sheets(0).BackColor=Color.Blue End If End Sub
Target Platforms: Windows 7, Windows 8, Windows 10, Windows Vista, Windows Server 2003, Windows Server 2008, Windows Server 2012, Windows XP Professional